2. Sometimes this debugs "minimized" when it is run, but not always:
Code: Select all
#APPNAME = ""
#WndMain = 0
OpenWindow(#WndMain, 0, 0, 640, 480, #APPNAME, #PB_Window_MaximizeGadget | #PB_Window_MinimizeGadget | #PB_Window_SizeGadget | #PB_Window_ScreenCentered | #PB_Window_SystemMenu)
CreateGadgetList(WindowID(#WndMain))
Repeat
Select WaitWindowEvent()
Case #PB_Event_MoveWindow
If GetWindowState(#WndMain) = #PB_Window_Minimize
Debug "Minimized"
EndIf
Case #PB_Event_CloseWindow
Break
EndSelect
ForEver


