home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / alib / d9xx / d958 / fed-case.lha / Fed-CASE / flows / windowexamp.flow < prev    next >
Text File  |  1993-12-04  |  2KB  |  36 lines
  1. Ron Heijmans
  2. Heijmans & Joosen
  3. FED-CASE
  4. Wed Feb 05 09:24:12 1992
  5. REV 1.0
  6.   858993202  842158394  1869573999  1869573999
  7. main
  8.   859059250  842215986  842150193  875770418
  9. ˆV_main()€
  10.   859059506  825441842  842150449  1144205874
  11. ÆGPSV_IntuitionBase.IntuitionBase = OpenLibrary("intuition.library",0);€
  12.   859060786  825373490  842150449  875770418
  13. ˆV_main()€
  14.   859059762  825441074  842150449  942879282
  15. —V_InitWindowStructure()€
  16.   859060018  825441842  842150449  1077097010
  17. ¹GPSV_Window.Window = OpenWindow(GSV_windowdef.NewWindow);€
  18.   859060274  825441842  842150449  993210930
  19. ¥WaitPort(GPSV_Window.Window.UserPort)€
  20.   859060530  825441842  842150449  1043542578
  21.  CloseWindow(GPSV_Window.Window);®CloseLibrary(GPSV_IntuitionBase.IntuitionBase)€
  22.   875770418  842158394  1869573999  1869573999
  23. Init Window Structure                        
  24.   875836466  842215986  842150193  942879282
  25. —V_InitWindowStructure()€
  26.   875839282  825373490  842150449  942879282
  27. —V_InitWindowStructure()€
  28.   875836722  825439282  842150449  1010119218
  29. §GSV_windowdef.NewWindow.LeftEdge   = 5;¨GSV_windowdef.NewWindow.TopEdge    = 10;©GSV_windowdef.NewWindow.Width      = 225;©GSV_windowdef.NewWindow.Height     = 100;¨GSV_windowdef.NewWindow.DetailPen  = -1;¨GSV_windowdef.NewWindow.BlockPen   = -1;€
  30.   875837490  791884850  842150449  1094005298
  31. ºGSV_windowdef.NewWindow.IDCMPFlags = NEWSIZE|MOUSEBUTTONS;²GSV_windowdef.NewWindow.Type       = WBENCHSCREEN;ªGSV_windowdef.NewWindow.BitMap     = NULL;ªGSV_windowdef.NewWindow.Screen     = NULL;©GSV_windowdef.NewWindow.MaxWidth   = 300;€
  32.   875838258  791884850  842150449  1144336946
  33. ³GSV_windowdef.NewWindow.Title      = "Hello World";ÉGSV_windowdef.NewWindow.Flags      = WINDOWDRAG|WINDOWSIZING|WINDOWCLOSE;¨GSV_windowdef.NewWindow.MinWidth   = 10;¨GSV_windowdef.NewWindow.MinHeight  = 10;©GSV_windowdef.NewWindow.MaxHeight  = 200;€
  34.   875839026  791884850  842150449  1043542578
  35. ±GSV_windowdef.NewWindow.IDCMPFlags = CLOSEWINDOW;€
  36.