Rick,
I got it working changing the colors of [color=#0000FF:1y84wvgm]RADIOS and CHECKBOXES [/color:1y84wvgm]as well with these changes :
// ---------------
FUNCTION OBJ_UPDATE( oFld2, nTextColor, nBackColor )
// ---FOLDER ---
AEval( oFld2:aDialogs[ 2 ]:aControls, { |o| IF( o:ClassName == "TSAY", ( o:SetColor( nTextColor, nBackColor ), o:Refresh() ), NIL ), ;
IF( o:ClassName == "TRADIO", ( o:nClrText := nTextColor, o:Refresh() ), NIL ), ;
IF( o:ClassName == "TCHECKBOX", ( o:SetColor( nTextColor, nBackColor ), o:Refresh() ), NIL ) } )
// --- DIALOG ---
AEval( oDlgMain:aControls, { |o| IF( o:ClassName == "TSAY", ( o:SetColor( nTextColor, nBackColor ), o:Refresh() ), NIL ), ;
IF( o:ClassName == "TRADIO", ( o:nClrText := nTextColor, o:Refresh() ), NIL ), ;
IF( o:ClassName == "TCHECKBOX", ( o:SetColor( nTextColor, nBackColor ), o:Refresh() ), NIL ) } )
[size=150:1y84wvgm]Why needed ??? there is already a < o:Refresh() > that works with SAY[/size:1y84wvgm]
[color=#0000FF:1y84wvgm][b:1y84wvgm]oDlgMain:Refresh()
oFld2:aDialogs[ 2 ]:Refresh()[/b:1y84wvgm][/color:1y84wvgm]
RETURN( NIL )
// --------------
[img:1y84wvgm]http://www.pflegeplus.com/IMAGES/Samples21.jpg[/img:1y84wvgm]
regards
Uwe
↧