In the queryunload of the form call a prg that would perform the exit.
I use this
do salir in myapp.prg (salir means to exit, in Spanish, use a name that
will not mean a reserved word, like exit, or you might confuse vfp)
procedure salir && inside the main prg, myapp.prg
if txnlevel() >0
rollback
endif
close tables all
close databases
close dlls
clear events
set sysmenu to default
if wexist("Standard")
show window standard
endif
endproc
Rafael Copquin
----- Original Message -----
From: "MB Software Solutions,LLC"
<[email protected]>
To: <[email protected]>
Sent: Wednesday, September 02, 2009 9:33 AM
Subject: "Cannot quit Visual Foxpro"
>I have a simple one-form app that displays, and I want to allow the "X"
> in the VFP screen's top right corner to be the same thing as though the
> user clicked the Quit button in the form. How do I do that?
>
> tia!
>
>
[excessive quoting removed by server]
_______________________________________________
Post Messages to: [email protected]
Subscription Maintenance: http://leafe.com/mailman/listinfo/profox
OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message:
http://leafe.com/archives/byMID/profox/dddbd4687f0c42379bcebc63adb49...@rafael
** 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.
