Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Formatting listbox from a cursor
Message
From
18/01/1999 12:56:54
 
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Miscellaneous
Thread ID:
00177002
Message ID:
00177260
Views:
40
>Jim,
>
>Here's a Load method of a form I used to play with colored listbox popups.
>
>* 04-Aug-98 fixed via KB Q185090 added the , before the color pair
>define popup mypop from 0,0 && in screen
>define bar 1 of MyPop prompt "Red" color ,rgb(255,0,0,255,255,255)
>define bar 2 of MyPop prompt "Blue" color ,rgb(0,0,255,255,255,255)
>define bar 3 of MyPop prompt "Green" color ,rgb(0,255,0,255,255,255)
>define bar 4 of MyPop prompt "Red2" color ,rgb(255,0,0,0,0,0)
>define bar 5 of MyPop prompt "Blue2" color ,rgb(0,0,255,0,0,0)
>define bar 6 of MyPop prompt "Green2" color ,rgb(0,255,0,0,0,0)
>define bar 7 of MyPop prompt "Green3" color G+/W
>define bar 8 of MyPop prompt "Green3-1" color scheme 1
>define bar 9 of MyPop prompt "Green3-2" color scheme 2
>define bar 10 of MyPop prompt "Green3-3" color scheme 3
>define bar 11 of MyPop prompt "Green3-4" color scheme 4
>define bar 12 of MyPop prompt "Green3-5" color scheme 5
>define bar 13 of MyPop prompt "Red4" color ,rgb(255,0,0)
>define bar 14 of MyPop prompt "Blue4" color ,rgb(0,0,255)
>define bar 15 of MyPop prompt "Green4" color ,rgb(0,255,0)
>
>The Listbox.RowSource=mypop, RSType = 9
>
David,

This is a menu popup. I did not realize this could be done. Fantastic.

regards,
Jim Edgar
Jurix Data Corporation
jmedgar@yahoo.com

No trees were destroyed in sending this message. However, a large number of electrons were diverted from their ordinary activities and terribly inconvenienced.
Previous
Reply
Map
View

Click here to load this message in the networking platform