home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 16 / CD_ASCQ_16_0994.iso / news / 4611 / fw16d.ins / SAMPLES / TESTEXIT.PRG < prev    next >
Text File  |  1994-05-30  |  470b  |  18 lines
  1. #include "FiveWin.ch"
  2.  
  3. //----------------------------------------------------------------------------//
  4.  
  5. function Main()
  6.  
  7.    local oWnd
  8.  
  9.    DEFINE WINDOW oWnd FROM 1, 1 TO 20, 60 TITLE "Trying to End Windows"
  10.  
  11.    ACTIVATE WINDOW oWnd ;
  12.       ON INIT MsgInfo( "Try to close Windows when I am running..." ) ;
  13.       VALID   MsgYesNo( "Do we let Windows end ?" )
  14.  
  15. return nil
  16.  
  17. //----------------------------------------------------------------------------//
  18.