TIP: Click on subject to list as thread! ANSI
echo: foxpro
to: ALL
from: DAVID POWELL
date: 1997-03-05 21:28:00
subject: FPLib() -- TrueQuit

Hi All:
This works in VFP as well as FPW 2.x.  Not a big deal, but...
*!*******************************************************************
*! Program...........: TrueQuit  (with apologies to John Wayne)
*! Author............: David Lee Powell
*! Project...........: Common
*! Created...........: 11-Nov-1994
*! Copyright.........: None, Public Domain
*) Description.......: Intercept a double-click on VFP's main screen
*)                   :   and prompt for confirmation of Quit.
*)                   : Place this program in your VFP's directory.
*! Syntax............: None
*! Parameter list....: None
*! Major change list.: None
*! Called by.........: CONFIG.FPW, as follows:
*!                   :   COMMAND = ON SHUTDOWN DO \VFP5\TrueQuit
*! Calls.............: None
*!*******************************************************************
 
LOCAL lnQuit
lnQuit = MESSAGEBOX("Do you really want to Quit?", 20, "Quit" )
IF lnQuit = 6                        && Yes button pressed
   QUIT
ENDI
----------------------------------------------------------------------
Short and to the point.  It has saved me from careless mousing.  
 
David in Dallas.
 
--- Maximus/2 3.01
---------------
* Origin: * MacSavvy OS/2 BBS * Dallas, Texas * 972-250-4479 * (1:124/1208)

SOURCE: echomail via exec-pc

Email questions or comments to sysop@ipingthereforeiam.com
All parts of this website painstakingly hand-crafted in the U.S.A.!
IPTIA BBS/MUD/Terminal/Game Server List, © 2025 IPTIA Consulting™.