|
<< Click to Display Table of Contents >> Dialogdefinition |
Um ein Dialogfenster zu erstellen, müssen Sie eine Dialogdefinition in das Script einfügen. Sie können dazu entweder den integrierten Dialogeditor verwenden (siehe Abschnitt Dialogeditor verwenden) oder die Dialogdefinition von Hand in das Script eintragen.
Auf den nächsten Seiten wollen wir uns eine solche Dialogdefinition einmal genauer ansehen.
Syntax einer Dialogdefinition
Dialogdefinitionen müssen von den Anweisungen Begin Dialog und End Dialog umgeben werden:
Begin Dialog DialogName [X, Y,] Breite, Höhe, Titel$ [,.Dialogfunktion]
' Hier Steuerelemente definieren
End Dialog
Die Parameter haben folgende Bedeutung:
Parameter |
Beschreibung |
DialogName |
Name der Dialogdefinition. Nach erfolgter Dialogdefinition kann eine Variable dieses Typs dimensioniert werden (Dim Name As Dialogname). |
X, Y |
Optional. Legt die Koordinaten für die linke obere Ecke des Dialogfensters fest (in Pixeln). |
Breite, Höhe |
Bestimmt die Breite und Höhe des Dialogs (in Pixeln). |
Titel$ |
Titel des Dialogs – wird in der Titelleiste des Dialogfensters angezeigt. |
.Dialogfunktion |
Dialogfunktion für diesen Dialog (optional). Ermöglicht das Aktivieren/Deaktivieren und Einblenden/Ausblenden von Dialogelementen sowie das Erzeugen verschachtelter Dialoge (siehe Abschnitt Die Dialogfunktion). |
Innerhalb der Dialogdefinition selbst sind die im Dialog anzuzeigenden Steuerelemente einzutragen. Hierfür können die auf den nächsten Seiten aufgeführten Schlüsselwörter verwendet werden.
Beispiel:
Sub Main
Begin Dialog QuitDialogTemplate 16, 32, 116, 64, "Beenden?"
Text 4, 8, 108, 8, "Möchten Sie das Programm beenden?"
CheckBox 32, 24, 63, 8, "Änderungen speichern", .SaveChanges
OKButton 12, 40, 40, 14
CancelButton 60, 40, 40, 14
End Dialog
Dim QuitDialog As QuitDialogTemplate
rc% = Dialog(QuitDialog)
' Hier können Sie das Ergebnis (rc%) des Dialogs auswerten
End Sub