Page 1 of 1

Folder Color

Posted: Fri Feb 15, 2008 5:35 pm
by thefull
Cogiendo el ejemplo TESTFLD2.PRG, y poniendo;

REDEFINE FOLDER oFld1 ID 110 OF oDlg ;
PROMPT "&Clipper", "&and", "&Windows", "&Magic" ;
DIALOGS "Sub1", "Sub2" ;
--> COLOR CLR_GREEN, CLR_BLUE

Según la documentación es posible, pues no coge los colores.
¿ Existe alguna manera de poner un color a un folder o es un bug ?

Posted: Sat Feb 16, 2008 10:11 am
by Detlef Hoefner
thefull,

maybe this could help you?

Code: Select all

ACTIVATE DIALOG oDlg;
   ON INIT ;        
   aEval( oFold:aDialogs,;
             { |oD| oD:bEraseBkGnd := NIL,;
                    oD:SetColor( COLOR CLR_GREEN, CLR_BLUE  ) } )              
Regards,
Detlef

Posted: Sat Feb 16, 2008 10:52 am
by thefull
Detlef Hoefner wrote:thefull,

maybe this could help you?

Code: Select all

ACTIVATE DIALOG oDlg;
   ON INIT ;        
   aEval( oFold:aDialogs,;
             { |oD| oD:bEraseBkGnd := NIL,;
                    oD:SetColor( COLOR CLR_GREEN, CLR_BLUE  ) } )              
Regards,
Detlef
Yeah! Thank you!

Code: Select all

 aEval( oFolder:aDialogs, { |oD| oD:bEraseBkGnd := NIL, oD:SetColor( CLR_GREEN, CLR_BLUE  ) } )
Erase COLOR definition ;-)

I think not is correct documentation, is the folder is 32 bits.
Please Antonio, Can you revised this documentation and put this option,
paint folder 32 btis in documentation ?

Thanks.
Rafa Carmona