Well,

first of all I sympathize with Tore's answer: you should take care formulating the question a bit better ;-)

Continuing your prgram after a clear all is possible as a trick shot: stuff your next program line in one of the predefined char-properties of _Screen (.Comment or .Tag) before issuing your clearance orgy. predefined props should survive with content - so afterwards execute that content via eval() or stuff into a newly created memvar and makro that line.


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
>
>