Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
How to start DOS app in minimized window
Message
De
27/10/1999 07:52:09
 
 
À
27/10/1999 05:00:22
Information générale
Forum:
Visual FoxPro
Catégorie:
Problèmes
Divers
Thread ID:
00282108
Message ID:
00282123
Vues:
28
Hi

Use could use the shellexecute api, here is a sample snippet of code

Declare INTEGER FindWindow IN "user32" String strClassName, INTEGER lpWindowName
Declare INTEGER ShellExecute IN "Shell32" Integer hWnd , String lpszOp ,String lpszFile ,String lpszParams , String lpszDir ,Integer fsShowCmd



? ShellExecute(0, "Open", "c:\MY DOCUMENTS\PKZIP.EXE", "", "", 0)
wait wind "no show"

? ShellExecute(0, "Open", "c:\MY DOCUMENTS\PKZIP.EXE", "", "", 1)
wait wind "normal"
? ShellExecute(0, "Open", "c:\MY DOCUMENTS\PKZIP.EXE", "", "", 2)
wait wind "minimised"
? ShellExecute(0, "Open", "c:\MY DOCUMENTS\PKZIP.EXE", "", "", 3)
wait wind "maximised"
?FindWindow("tty",1)
?FindWindow("tty",0)

hope this helps
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform