A problem with function ChooseColor() ?

[ukoenig]

Hello,

I noticed a problem with < ChooseColor() >
restoring the old color, doesn't seems to work
a BREAK returns always 0 ( black )
Also tested changing the color BEFORE the break but still black
Return NIL would be ok, because 0 is a color as well can be selected.

tested as well with sample < LINES.prg >

STATIC PROCEDURE NewColor()
LOCAL OldColor := nColor
if ( nColor := ChooseColor() ) == -1 // NO result
// MsgAlert( nColor ) = returns always 0 !!!
nColor := OldColor
endif

any idea how to keep the old color ?



added a alert to the color-selection



best regards
Uwe

[Antonio Linares]

Uwe,

FWH function ChooseColor() supports two optional parameters:

http://wiki.fivetechsoft.com/doku.php?id=fivewin_function_choosecolor

As the first parameter you may provide it the "oldColor" and that value will be returned
when the user press cancel

[ukoenig]

Antonio,

thank You very much for the info.
With included parameters in < ChooseColor() > it works fine now.
flag = 1 opens a small and flag = 2 opens a full color-selection.

best regards
Uwe