Discussion:
Your cleanup program
m***@mbsoftwaresolutions.com
2017-12-29 16:31:16 UTC
Permalink
I wanted to share mine with you. I'm sure it's stuff I've collected
from here from Ted and others over the years. After debugging and
clicking "Fix", I often would encounter some bizarro VFP bug whereby my
IDE would freeze. I added code into my cleanup routine to close out the
debugger window and that saved me so much frustration over the years.

ON ERROR
ON SHUTDOWN

SQLDISCONNECT(0)
SET SYSMENU TO DEFAULT
CLEAR ALL
CLEAR RESOURCES
_screen.Caption = VERSION(4) + " Development (" + CURDIR() + ")"
_screen.Picture = ""

DEFINE BAR 8 OF _MTOOLS PROMPT "\-"
DEFINE BAR 9 OF _MTOOLS PROMPT "Force quit"
ON SELECTION BAR 9 OF _MTOOLS do c:\dev\progs\quitfox.prg

REMOVEPROPERTY(_screen,'oTables') && mjb 02-21-15
SET PROCEDURE TO
MODIFY PROJECT c:\dev\YourProject.pjx NOWAIT
CLEAR
IF WVISIBLE("Visual Foxpro Debugger") THEN
RELEASE WINDOWS "Visual Foxpro Debugger"
ENDIF




and my QuitFox.prg is simply this:
Declare ExitProcess in Win32API Long
ExitProcess(1)


Happy New Year! Still rocking the Fox after all these years yet!
--Mike

_______________________________________________
Post Messages to: ***@leafe.com
Subscription Maintenance: http://mail.leafe.com/mailman/listinfo/profox
OT-free version of this list: http://mail.leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message: http://leafe.com/archives/byMID/profox/***@mbsoftwaresolutions.com
** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Koen Piller
2017-12-30 14:51:37 UTC
Permalink
Hi,

I have this routine:

1) in my vfpstart.prg

On Key Label Alt+F5 Do "D:\VFP9\RESETTEN.PRG"

and resetten.prg has following line:

Keyboard('cancel{enter}clear all{enter}release all{enter}')

Regards,
Koen
I wanted to share mine with you. I'm sure it's stuff I've collected from
here from Ted and others over the years. After debugging and clicking
"Fix", I often would encounter some bizarro VFP bug whereby my IDE would
freeze. I added code into my cleanup routine to close out the debugger
window and that saved me so much frustration over the years.
ON ERROR
ON SHUTDOWN
SQLDISCONNECT(0)
SET SYSMENU TO DEFAULT
CLEAR ALL
CLEAR RESOURCES
_screen.Caption = VERSION(4) + " Development (" + CURDIR() + ")"
_screen.Picture = ""
DEFINE BAR 8 OF _MTOOLS PROMPT "\-"
DEFINE BAR 9 OF _MTOOLS PROMPT "Force quit"
ON SELECTION BAR 9 OF _MTOOLS do c:\dev\progs\quitfox.prg
REMOVEPROPERTY(_screen,'oTables') && mjb 02-21-15
SET PROCEDURE TO
MODIFY PROJECT c:\dev\YourProject.pjx NOWAIT
CLEAR
IF WVISIBLE("Visual Foxpro Debugger") THEN
RELEASE WINDOWS "Visual Foxpro Debugger"
ENDIF
Declare ExitProcess in Win32API Long
ExitProcess(1)
Happy New Year! Still rocking the Fox after all these years yet!
--Mike
[excessive quoting removed by server]

_______________________________________________
Post Messages to: ***@leafe.com
Subscription Maintenance: http://mail.leafe.com/mailman/listinfo/profox
OT-free version of this list: http://mail.leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message: http://leafe.com/archives/byMID/profox/CACUu1StSK2v=GozwJ+ZunJBBqjDG--W+h8V6m2cA-+***@mail.gmail.com
** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Loading...