Rick, I got it working changing the colors of RADIOS and CHECKBOXES 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, ...
Hello, I wanted to change the textcolor of RADIOS and CHECKBOXES at runtime. It only works on SAY FUNCTION OBJ_UPDATE( oFld2, nTextColor, nBackColor ) // FOLDER AEval( oFld2:aDialogs[ 2 ]:aControls, { |o| IF( o:ClassName == "TSAY", o:SetColor( nTextColor, nBackColor ), NIL ...
... oSay1:SetColor( 16777215, 255 ) RETURN NIL The same from RESOURCE http://www.pflegeplus.com/IMAGES/FldSay2.jpg FUNCTION F_PAGE5( oFld2 ) LOCAL oSay1, oGet1, cText1 := "Testing GET-colors" LOCAL cText2 := "Testing SAY - background-color" REDEFINE GET oGet1 VAR ...