Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Subject: set skip to bar problem FPD25
Message
General information
Forum:
Visual FoxPro
Category:
FoxPro 2.x
Miscellaneous
Thread ID:
00524164
Message ID:
00524635
Views:
17
This message has been marked as a message which has helped to the initial question of the thread.
The foolowing command
SET SKIP OF BAR m.zi OF helppopup m.zskip
sets skip condition to m.zskip. While you are in a loop m.zskip is correct because it's calculated for each bar. After you exit loop all BAR's will be desabled or enabled based on the vaue of m.zskip. The modification to code shown below shoud fix this problem.
    FOR m.zi = 1 TO CNTBAR("helppopup")
       m.zskip = <b>IIF( EVAL(zfiltstr), ".T.", ".F.")</b>
       SET SKIP OF BAR m.zi OF helppopup <b>&zskip</b>
    ENDFOR
>Here is that actual call Ive used for the helpme function
>
>m.zsavealias = ALIAS()
>
>= helpme(m.zsavealias, "company", " " + m.zsavealias + ".company + ' CMP' + ;
> TRANSFORM(" + m.zsavealias + ".cmpny_no, '@L 99999')", ;
> "xselectbar", LEN(&zsavealias..company) + 11, ;
> IIF(EMPTY(m._vsouserid), '.F.', IIF(m._vsosuper, '.F.', '!SEEK(codeit(m._vsouserid) + codeit(PADR(PRMBAR("helppopup", m.zi), 80)), "vsosecur")')), .F., .T.)
>
>basically this is a popup that has the companies that are there in the app and the user is controlled by a security database and the skip will be based on the user access rights. Bit complex but here it is, otherwise the helpme function shines out where I want to set filter, normal helps, great. But skip does not work
--sb--
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform