home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 16 / CD_ASCQ_16_0994.iso / news / 4611 / fw16d.ins / SAMPLES / TESTDLG4.PRG < prev    next >
Text File  |  1994-06-11  |  583b  |  29 lines
  1. #include "FiveWin.ch"
  2.  
  3. //----------------------------------------------------------------------------//
  4.  
  5. function Main()
  6.  
  7.    local oWnd
  8.  
  9.    DEFINE WINDOW oWnd TITLE "A Window"
  10.  
  11.    ACTIVATE WINDOW oWnd ;
  12.       ON INIT ShowDlg()
  13.  
  14. return nil
  15.  
  16. //----------------------------------------------------------------------------//
  17.  
  18. function ShowDlg()
  19.  
  20.    local oDlg
  21.  
  22.    DEFINE DIALOG oDlg FROM 5, 5 TO 20, 40 TITLE "A Dialog Box"
  23.  
  24.    ACTIVATE DIALOG oDlg CENTERED NOWAIT
  25.  
  26. return nil
  27.  
  28. //----------------------------------------------------------------------------//
  29.