Ein Fenster beim Öffnen Maximieren
Verfasst: 02.02.2005 19:21
wie kann ich , wenn ich ein fenster geöffnet habe dieses Fenster Maximieren?
Das deutsche PureBasic-Forum
https://www.purebasic.fr/german/
Code: Alles auswählen
Enumeration
#Window_0
#Button_0
#Button_1
#Button_2
#Button_3
EndEnumeration
If OpenWindow(#Window_0, 304, 8, 600, 300, #PB_Window_SystemMenu | #PB_Window_MinimizeGadget | #PB_Window_MaximizeGadget | #PB_Window_SizeGadget | #PB_Window_TitleBar , "New window ( 0 )")
hwnd=WindowID(#Window_0)
If CreateGadgetList(WindowID())
ButtonGadget(#Button_0, 30, 20, 70, 30, "maxi")
ButtonGadget(#Button_1, 30, 60, 70, 30, "normal")
ButtonGadget(#Button_2, 30, 100, 70, 40, "taskleiste")
ButtonGadget(#Button_3, 30, 140, 70, 40, "Beenden")
EndIf
EndIf
Repeat
Event = WaitWindowEvent()
If Event = #PB_EventGadget
GadgetID = EventGadgetID()
If GadgetID = #Button_0
ShowWindow_(hwnd,#SW_MAXIMIZE)
ElseIf GadgetID = #Button_1
ShowWindow_(hwnd,#SW_RESTORE)
ElseIf GadgetID = #Button_2
ShowWindow_(hwnd,#SW_MINIMIZE)
ElseIf GadgetID = #Button_3
End
EndIf
EndIf
Until Event = #PB_EventCloseWindow
End