Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
CLEAR ALL problem
Message
De
18/11/2013 02:56:56
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Versions des environnements
Visual FoxPro:
VFP 9 SP2
OS:
Windows Server 2012
Network:
Windows 2008 Server
Database:
MS SQL Server
Application:
Web
Divers
Thread ID:
01588172
Message ID:
01588222
Vues:
54
Bernhart,

that code *is* winding down code for a clean exit. It makes tabula rasa of vfp state reached before, even clobbering all parameter information. Usually not thebest way to go when you want to continue or branch out. As I described it is possible to continue in such a process, but another - cleaner - approach would be to not run the clear orgy if you want to continue. The way I showed is a way to work against the intentions of the previous code - meaning you code in part against you existing framework. Might be better to understand what you have currently running and modify that.

my 0.02€

thomas

>
>Sorry for my poor english….
>The prgramme is stopped and cannot advance any more.
>i't impossible to continue….
>
>i show the debug window ( on the picture ) to explain...
>the command 'Clear all' broke the processes ?
>
>
>bernhart
>
>
>
>
>
>>HTH
>>
>>thomas
>>
>>
>>>Hi all ,
>>>
>>> when I finish my program I have a problem.
>>>
>>>'Clear All' command kill my processus.
>>>it 's impossible to continue.
>>>
>>>How can i do to solve this problem ?
>>>
>>>this is a picture to understand….
>>>https://www.dropbox.com/s/xaayqfz7zdo1sy1/2013-11-17_17-10-45.png
>>>
>>>
>>>thanks in advance for help
>>>
>>>Bernhart
>>>
>>>
>>>
>>>
>>>
>>>  FOR lnI = 1 TO _SCREEN.FORMCOUNT
>>>    IF PEMSTATUS(_SCREEN.FORMS[lnI], 'QueryUnload', 5)
>>>      llOK = llOK AND _SCREEN.FORMS[lnI].QUERYUNLOAD()
>>>    ENDIF PEMSTATUS(_SCREEN.FORMS[lnI], 'QueryUnload', 5)
>>>  NEXT lnI
>>>
>>>DO zz
>>>
>>>  CLEAR RESOURCES
>>>  CLEAR MEMORY
>>>  CLEAR CLASS ALL
>>>  CLEAR ERROR
>>>  CLEAR PROGRAM
>>>  CLEAR CLASS ALL
>>>  CLEAR DLLS
>>> * CLEAR debug
>>>  RELEASE ALL EXTENDED
>>>  CLEAR ALL
>>>
>>>
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform