Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Help - On Escape command gives problems
Message
De
27/01/1999 12:12:57
 
 
À
27/01/1999 09:35:55
Kumar C G
Nucleus Infomatrix
Bangalore, Inde
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
00180728
Message ID:
00180842
Vues:
16
You might try a different approach. Say your process is inside a loop:
THISFORM.cmdCancel.Visible = .T.

DO WHILE NOT lCompleted AND NOT THISFORM.lInterrupted
   * Some process here
   DOEVENTS && Tell VFP to check for pending events (mouse click, keyboard entry, etc.)
ENDDO

THISFORM.cmdCancel.Visible = .F.

cmdCancel.Click():
THISFORM.lInterrupted = .T.
HTH

>I have a long process running in My program. I want to give the user the flexibility to stop and get out of this process when he desires. I have tried using On escape command in the code for the process.In the message box if I try to continue the same process by giving RETRY it says " Invalid Push/ Pop"
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform