oFld:SetColor( "N/G" ) doesn't work ?

[ukoenig]

Hello,

I wanted to change from Gradient to Single-Color
with oFld:SetColor( "N/G" )
It seems, it doen't work.
I tested with < Testfld3.prg > with the same result.
To get it working, I used the Gradient-function with two same colors.



function Another()
local oWnd, oFld

DEFINE WINDOW oWnd TITLE "FiveWin Dynamic folders" ;
FROM 5, 5 TO 20, 50 COLOR "N/G"

@ 0.5, 1 FOLDER oFld PROMPT "&xBase", "&And OOP", "&Power" ;
OF oWnd SIZE 260, 180

oFld:SetColor( "N/G" )

@ 1, 1 BUTTON "&Hello" OF oFld:aDialogs[ 1 ] ;
ACTION MsgInfo( "Hello world!" ) SIZE 80, 20

ACTIVATE WINDOW oWnd

return nil

Using Gradient-Function :


Best regards
Uwe