#PB_Window_MaximizeGadget = Ergebnis ermitteln

[RSBasic]

Hi ihr, ich habe ein Problem. Wenn ich im Fenster den Maximieren-Button (in der Titelleiste) drücke, möchte ich ermitteln, ob dieser Button gedrückt wurde.
Ich möchte diesen Schema haben:

Code: Alles auswählen

If EventID=#PB_Event_SizeWindow
;...
EndIf

Bitte helft mir

[ts-soft]

Code: Alles auswählen

#Win = 0

If OpenWindow(#Win, #PB_Ignore, 0, 640, 480, "", #PB_Window_SystemMenu|#PB_Window_MaximizeGadget|#PB_Window_MinimizeGadget)

  Repeat
    Select WaitWindowEvent()
      Case #PB_Event_CloseWindow : Break
      Case #PB_Event_SizeWindow, #PB_Event_MoveWindow
        Select GetWindowState(#Win)
          Case #PB_Window_Normal : Debug "Normal"
          Case #PB_Window_Maximize : Debug "Maximiert"
          Case #PB_Window_Minimize : Debug "Minimiert"
        EndSelect
    EndSelect
  ForEver
EndIf

>> Ich möchte diesen Schema haben:
Select ist in diesem Falle kürzer, ansonsten bitte selber ändern

[RSBasic]

@ts-soft
Vielen Dank, ich habe bisschen verändert, sodass ich in der Repeat-Schleife ermitteln kann.
THX für dein Code-Beispiel.