I noticed, that the background color of a say not to change!?
Board index FiveWin for Harbour/xHarbour Background color of TSay
Günther,
my test
@ 22, 20 SAY oCSay[1] PROMPT "Window" SIZE 28,12 FONT oFontSys PIXEL
oCSay[1]:SetColor( 0, 255 ) // original
@ 20, 50 GET oCGet[1] VAR cGet[1] SIZE 80, 18 OF oDlg2 COLOR 0, nWColorB UPDATE ;
BITMAP c_Path1 + "Help.bmp" PIXEL ;
ACTION ( nWColorB := ChooseColor( nWColorB ), oCGet[1]:SetColor( , nWColorB ), ;
oCSay[1]:SetColor( 0, nWColorB ), oCSay[1]:Refresh() ) // modified
regards
Uwe
my test
@ 22, 20 SAY oCSay[1] PROMPT "Window" SIZE 28,12 FONT oFontSys PIXEL
oCSay[1]:SetColor( 0, 255 ) // original
@ 20, 50 GET oCGet[1] VAR cGet[1] SIZE 80, 18 OF oDlg2 COLOR 0, nWColorB UPDATE ;
BITMAP c_Path1 + "Help.bmp" PIXEL ;
ACTION ( nWColorB := ChooseColor( nWColorB ), oCGet[1]:SetColor( , nWColorB ), ;
oCSay[1]:SetColor( 0, nWColorB ), oCSay[1]:Refresh() ) // modified
regards
Uwe
Since 1995 ( the first release of FW 1.9 )
i work with FW.
If you have any questions about special functions, maybe i can help.
i work with FW.
If you have any questions about special functions, maybe i can help.
Uwe, i have used
but no background-color of the SAY.
REDEFINE SAY PROMPT "xyz" ID 100 OF oDlg COLOR 0,255but no background-color of the SAY.
Günther,
if the dialog is defined < transparent >
the background-color of the say will be ignored
if You need a mixture of color and transparent use a normal dialog
REDEFINE SAY oSay1 PROMPT "xyz" ID 100 OF oDlg
oSay1:SetColor( 0, 255 ) // color
or
oSay1:lTransparent := .T. // transparent
regards
Uwe
if the dialog is defined < transparent >
the background-color of the say will be ignored
if You need a mixture of color and transparent use a normal dialog
REDEFINE SAY PROMPT "xyz" ID 100 OF oDlg COLOR 0,255
REDEFINE SAY oSay1 PROMPT "xyz" ID 100 OF oDlg
oSay1:SetColor( 0, 255 ) // color
or
oSay1:lTransparent := .T. // transparent
regards
Uwe
Since 1995 ( the first release of FW 1.9 )
i work with FW.
If you have any questions about special functions, maybe i can help.
i work with FW.
If you have any questions about special functions, maybe i can help.
Thanks Uwe. I use for the dialog. This seems also switch to transparent.
Now i use a readonly-get without border.
GRADIENT {{1,color1, color2]}}Now i use a readonly-get without border.
DEFINE DIALOG oDlg GRADIENT aGrad
oDlg:lTransparent := .f.Regards
G. N. Rao.
Hyderabad, India
G. N. Rao.
Hyderabad, India