Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Display modal form on startup
Message
 
 
To
17/06/2002 00:16:17
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Miscellaneous
Thread ID:
00669077
Message ID:
00671091
Views:
22
>Hi,
>How to display modal form on startup before issue READ EVENT?
>
>I remember that, it is possible by setting
>
>Desktop = .T.
>Windowtype = 1
>ShowWindow = 1
>
>But it doesn't work.. Any mistake?
>
>Thank you
    SECID=         "          "
    USERPASS=      "          "
    gcSTATUS=      "    "
    gcUSER=        "         "                 && Requestor Variables
    gcDEPT=        "         "        
    lAREFLAG=      "    "                      && Accept Add or Edit Flag (Rece)
    FOR I=1 TO 50                              && CLEAR character array
        caPARTNO(I)= " "
    ENDFOR
    prg2exe= "frmTABTO"                        && Program to Execute
    STORE "\vfpapps\t2\" TO SECpath            && Security Path
    DO Form ..\t2\t2.scx WITH prg2exe,SECpath
    IF SECID= "ARCHIVE"
...
        USERPASS= "          "
    ENDIF
    IF USERPASS= "          "                  && BAD Login! (do nothing)
    ELSE
        DO MENUTOOL.MPR
        DO Form frmTABTO
        READ EVENT                             && read
    ENDIF
    DO CLEANUP
    ON SHUTDOWN
  ***
where T2 is a model (customized login) form created from form generator
you can specify different programs and different security paths (prg2exe secpath)
Edgar L. Bolton, B.S. B.B.A.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform