Page 1 of 1

Change Color of Say

Posted: Wed Jan 13, 2010 2:45 pm
by ChrisMillard
I build my Windows at runtime, i.e. I don't use resources. I have a windows with a number of SAY objects, for example:

Code: Select all

@ nTop, nLeft SAY oSay PROMPT "Prompt" SIZE nClientWidth, nFontHeight FONT oFont BORDER PIXEL CENTER COLOR CLR_BLACK, CLR_WHITE UPDATE
I already use

Code: Select all

oSay:SetText("Something Else")
quite successfully.

But I also need to change either the Text or Background Color of the SAY.

Code: Select all

oSay:SetColor(CLR_GREEN, CLR_BLUE)
does not exist.

I have tried

Code: Select all

SetTextColor(oSay:hWnd, nRGB(CLR_GREEN))
but that does not seem to do anything.

And

Code: Select all

REDEFINE SAY oSAY COLOR CLR_GREEN, CLR_BLUE
gives a method not defined error.

Can somebody point me in the right direction.

Regards
Chris Millard

Re: Change Color of Say

Posted: Wed Jan 13, 2010 5:16 pm
by Enrico Maria Giordano
ChrisMillard wrote:

Code: Select all

oSay:SetColor(CLR_GREEN, CLR_BLUE)
It should work fine.

EMG

Re: Change Color of Say

Posted: Wed Jan 13, 2010 8:40 pm
by ChrisMillard
Well how strange, I am sure I tried it first.

Many thanks for making me go back and try it again, I have spent quite some time trying to figure how to do something that should have been simple, to now find it was simple all the time. lol :D

Happy New Year

Chris Millard