Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Equivalent for Define popup with skip conditions
Message
From
30/07/1999 08:39:18
Mark Hall
Independent Developer & Voip Specialist
Keston, Kent, United Kingdom
 
 
To
30/07/1999 07:52:40
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Miscellaneous
Thread ID:
00248104
Message ID:
00248140
Views:
11
There is no SKIP in a combo, but you can disable an option by putting a \ character before its description.

I suggest you add some code to the GotFocus of a combo, then pass through the list of the combo, adding and removing \ as necessary.



>my legacy code uses
>
> DEFINE POPUP operator FROM 05,20 shadow message "Select an OPERATOR"
>
>
> DEFINE BAR 1 OF operator PROMPT 'Equal '
> DEFINE BAR 2 OF operator PROMPT 'Exactly Equal ' SKIP FOR FLDTYP="L"
> DEFINE BAR 3 OF operator PROMPT 'Not Equal ' SKIP FOR FLDTYP="L"
> DEFINE BAR 4 OF operator PROMPT 'Greater Than ' SKIP FOR FLDTYP="L"
> DEFINE BAR 5 OF operator PROMPT 'Greater or Equal ' SKIP FOR FLDTYP="L"
> DEFINE BAR 6 OF operator PROMPT 'Less Than ' SKIP FOR FLDTYP="L"
> DEFINE BAR 7 OF operator PROMPT 'Less or Equal ' SKIP FOR FLDTYP="L"
> DEFINE BAR 8 OF operator PROMPT 'Contains ' SKIP FOR FLDTYP # "C" AND FLDTYP # "M"
> DEFINE BAR 9 OF operator PROMPT 'Does Not Contain ' SKIP FOR FLDTYP # "C" AND FLDTYP # "M"
> DEFINE BAR 10 OF operator PROMPT 'Empty '
> DEFINE BAR 11 OF operator PROMPT 'Not Empty '
> DEFINE BAR 12 of operator PROMPT 'Deleted '
> DEFINE BAR 13 of operator PROMPT 'Not Deleted '
>
>
>How do I achieve the same result with a more politically correct modern vfp form object. Combo and list boxes don't appear to have a way to include the 'skip' conditions...
>
>
>Harry
Regards
Mark

Microsoft VFP MCP
Menulib - OO Menus for VFP www.hidb.com/menulib
Previous
Reply
Map
View

Click here to load this message in the networking platform