How would this be done in the Form Designer with an existing ComboBox? I know this message is old, but it seems to address what I need, except I'm not working in a PRG for this.

>

>IF PEMSTATUS(_Screen, 'cboTest', 5)
>    _Screen.RemoveObject('cboTest')
>ENDIF
>condition = 1
>DEFINE POPUP popTest
>
>m.test = IIF(condition=1,'RGB(0,0,0,255,0,0)','RGB(0,0,0,46,56,3)')
>DEFINE BAR 1 OF popTest PROMPT 'Red' COLOR ,&test
>DEFINE BAR 2 OF popTest PROMPT 'Blue' COLOR ,RGB(0,0,0,0,0,255)
>DEFINE BAR 3 OF popTest PROMPT 'Green' COLOR ,RGB(0,0,0,0,255,0)
>DEFINE BAR 4 OF popTest PROMPT 'Yellow' COLOR ,RGB(0,0,0,255,255,0)
>
>_Screen.AddObject('cboTest', 'ComboBox')
>
>WITH _Screen.cboTest
>    .Top = 200
>    .Left = 50
>    .RowSourceType = 9
>    .RowSource = 'popTest'
>    .Visible = .t.
>    .style = 2
>    .value = 3
>ENDWITH

>
>Try the same code with
>

condition = 2

>
>HTH