RSS
StartseiteKnowledge LibraryTop 10Impressum

4.9 Wie stelle ich ein Formular wieder her (normal/maximiert)?

VB5-VB6

Von: Thorsten Dörfler

Ein Formular per Code zu minimieren ist schnell erledigt. Die Anweisung:

Form.WindowState = vbMinimized

genügt und das Formular verschwindet in der Taskleiste.

Das Wiederherstellen per Code gestaltet sich da schon schwieriger, solange der Benutzer darüber entscheiden kann, ob das Formular normal oder maximiert angezeigt wird. Nun kann man sich den Zustand des Formulars selber in einer Variablen merken und das Fenster entsprechend wiederherstellen. Aber warum sollte man sich diese Mühe machen, wenn Windows das schon selber macht? Mit der API Funktion ShowWindow und dem Parameter SW_RESTORE weisen Sie Windows an, das Formular in seinem ursprünglichen Zustand wiederherzustellen:

' Deklaration 
Private Declare Function ShowWindow Lib "user32" ( _
        ByVal hwnd As Long, _
        ByVal nCmdShow As Long _
              ) As Long

Private Const SW_RESTORE As Long = 9

Public Sub RestoreForm(ByRef Form As Form)
  ShowWindow Form.hwnd, SW_RESTORE
End Sub

' Anwendung
RestoreForm Form1