home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: InfoMgt / InfoMgt.zip / kim21.zip / BSP1.KIM < prev    next >
Text File  |  1994-05-01  |  942b  |  30 lines
  1. rem Name            :    BSP1.KIM
  2. rem Datum           :    März 1994
  3. rem Version         :    1.0
  4. rem Programm        :    Programm zur Erzeugung eines einfachen Hauptfensters
  5. rem Programmierer   :    EDV-Kohlenbach
  6.  
  7. REM Zunächst das Hauptprogramm
  8. CALL fenster_def ("window", 3, 2, 58, 16, "Testfenster")
  9. WIN_PAINT "window"
  10. DUMMY_EVENT
  11. END
  12.  
  13. REM Nun das Modul mit der Definition des Fensters
  14. MODUL fenster_def (char id, float x, float y, float xr, float yr, char ueber)
  15.     def_window id,x,y,xr,yr
  16.     def_system_button "system_button", 0
  17.     def_max_button "max_button"
  18.     def_min_button "min_button"
  19.     def_border "border"
  20.     def_titel "titel", ueber
  21.     add_item "window",..
  22.             "border",..
  23.             "system_button",..
  24.             "max_button",..
  25.             "min_button",..
  26.             "titel"
  27.     ENDMOD
  28.  
  29. rem ----------------------------- Ende des Programms ------------------------------------
  30.