Thanks Yuri

It's been some time since I use fox 2.x, and to make matter worse before I did not use the screen builder. I had to code like it was dbaseIII (for what reason on the manager knows!!!)

Thanks again I'll give your snipet ago.

Eddie


>Sorry, did not work with 2.5 for a long time.
>Probably you may use idea from this:

>define popup P_List
>sele (source_table)
>ia=0
>SCAN
>ia=ia+1

>lcfontoption=[Font "Tahoma", 11 Style "B"]

>lccoloroption=IIF("YURI"$UPPER(EVALUATE(FIELD(1))),;
>[ Color, RGB(255,255,255,192,0,0)],"")

>Define BAR(ia) of P_List PROMPT ALLTRIM(EVALUATE(FIELD(1))) ;
>&lcfontoption ;
>&lccoloroption

>ENDSCAN