>>I'd like to create a shortcut menu that a user will bring up when he clicks with a right click on a label.
>>
>>Thanks
>
>Try this in right click on a label:
>

Thisform.ScaleMode = 0        && Foxels
>lnPosX = This.Left + This.Width
>lnPosY = This.Top + This.Height
>Thisform.ScaleMode = 3          && Back to Pixels
>DEFINE POPUP test SHORTCUT RELATIVE FROM (lnPosY), (lnPosX)
>DEFINE BAR 1 OF test PROMPT "Menu 1"
>DEFINE BAR 2 OF test PROMPT "Menu 2"
>ACTIVATE POPUP test

>
>HTH
But how will I change the color?
Sorry if I am missing the obvious.