Hello and thanks to Walter Meester,
I recently obtained fox6command (download #
9674) and have been able to successfully integrate it into my VFP7 application by including the start.prg and command.scx in my project. I have modified it:
* One change to command.scx: AutoCenter=.T. so I could see what was being written to the screen without moving the 'command window' every time.
* In start.prg, I added a few lines of code in two places.
1) In the first CASE of the DO CASE, right after the first non-comment:
_tax_cCommand=_oCommand.Command
IF UPPER(ALLTRIM(_tax_cCommand))=="QUIT"
_Tax_lExit = .t.
EXIT
ENDIF
because I prefer a command over the mouse to close it.
2) and just ahead of the RETURN at the end of the main program:
CLEAR
CLEAR EVENTS
_oCommand.Release
RETURN
to clean up the _screen and close the 'command window' (because the user/developer didn't use the mouse).
One challenge remains: now when I use the mouse to close the window, a CLEAR EVENTS is not issued, and the program 'hangs'. The app I'm working on has all Modal screens/forms (per the client's request). Where can I sneak in a CLEAR EVENTS so that control returns to my modal form after the 'command window' closes?
Thanks for a posting this useful utility.
Randy Bosma
VFP - Because life is too short to code in something else...