home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / dtx9302 / signals / ts / mainwin0.def < prev    next >
Encoding:
Modula Definition  |  1993-01-19  |  820 b   |  34 lines

  1. DEFINITION MODULE MainWin0;
  2.  
  3. (*
  4.   Dient zur einfachen und schnellen Erstellung von Prototyp-Programmen
  5.   mit OS/2 Oberfläche.
  6. *)
  7.  
  8. FROM OS2DEF IMPORT HWND,LSET,HAB;
  9. IMPORT Win;
  10.  
  11.  
  12. CONST   DefaultFRAME    =   Win.FCF_TITLEBAR
  13.                           + Win.FCF_SYSMENU
  14.                           + Win.FCF_SIZEBORDER
  15.                           + Win.FCF_MINMAX
  16.                           + Win.FCF_SHELLPOSITION
  17.                           + Win.FCF_TASKLIST;
  18.  
  19.  
  20. VAR     hwndFrame       : HWND;         (* alle drei erst nach Create gültig ! *)
  21.         hwndClient      : HWND;
  22.         hab             : HAB;
  23.  
  24.  
  25. PROCEDURE Frame( fr : LSET);
  26.           (* nur dann vor Create aufzurufen, wenn anders als DefaultFRAME *)
  27.  
  28. PROCEDURE Create( WinProc : Win.PFNWP);
  29.  
  30. PROCEDURE WorkLoop;
  31.  
  32.  
  33. END MainWin0.
  34.