Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
How I used/modified fox6command
Message
General information
Forum:
Visual FoxPro
Category:
Other
Title:
How I used/modified fox6command
Miscellaneous
Thread ID:
00691498
Message ID:
00691498
Views:
47
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"   && 4 new lines  20.Aug.02 RB
  _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   && 3 new lines  20.Aug.02 RB
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...
Next
Reply
Map
View

Click here to load this message in the networking platform