Hallo,
momentan stehe ich mal wieder voll auf dem Schlauch.
kurze Erklärung:
- via Funktion 1 erstelle ich meine GUI
- hier meine While - Wend Schleife
Spoiler anzeigen
$msg = GUIGetMsg()
Switch $msg
Case $GUI_EVENT_CLOSE
_Exit(); Wenn X gedrückt wird, wird _Exit Funktion aufgerufen
Case $WelcomeItem; Wenn Willkommen im 1. Frame gedrückt wird ..
_Menu($WelcomeItem); ... dann 3. Frame mit Willkommensnachricht
Case $SuchenItem; Wenn "Suche Dokumente auf" im 1. Frame gedrückt wird
_Menu($SuchenItem); ... dann bestücke den 2. und 3. Frame
Case $SuchenItemSub[1]; Wenn das Such Item angeklickt wird
_Menu($SuchenItemSub[1]); ... gehe zur Funktion
Case $SuchenItemSub[2]; Wenn das Such Item angeklickt wird
_Menu($SuchenItemSub[2]); ... gehe zur Funktion
Case $SuchenItemSub[3]; Wenn das Such Item angeklickt wird
_Menu($SuchenItemSub[3]); ... gehe zur Funktion
Case $SuchenItemSub[4]; Wenn das Such Item angeklickt wird
_Menu($SuchenItemSub[4]); ... gehe zur Funktion
Case $SuchenItemSub[5]; Wenn das Such Item angeklickt wird
_Menu($SuchenItemSub[5]); ... gehe zur Funktion
Case $SuchenItemSub[6]; Wenn das Such Item angeklickt wird
_Menu($SuchenItemSub[6]); ... gehe zur Funktion
Case $SuchenItemSub[7]; Wenn das Such Item angeklickt wird
_Menu($SuchenItemSub[7]); ... gehe zur Funktion
Case $SuchenItemSub[8]; Wenn das Such Item angeklickt wird
_Menu($SuchenItemSub[8]); ... gehe zur Funktion
Case $SuchenItemSub[9]; Wenn das Such Item angeklickt wird
_Menu($SuchenItemSub[9]); ... gehe zur Funktion
Case $SuchenItemSub[10]; Wenn das Such Item angeklickt wird
_Menu($SuchenItemSub[10]); ... gehe zur Funktion
Case $SuchenItemSub[11]; Wenn das Such Item angeklickt wird
_Menu($SuchenItemSub[11]); ... gehe zur Funktion
Case $SuchenItemSub[12]; Wenn das Such Item angeklickt wird
_Menu($SuchenItemSub[12]); ... gehe zur Funktion
Case $SuchenItemSub[13]; Wenn das Such Item angeklickt wird
_Menu($SuchenItemSub[13]); ... gehe zur Funktion
Case $SuchenItemSub[14]; Wenn das Such Item angeklickt wird
_Menu($SuchenItemSub[14]); ... gehe zur Funktion
Case $SuchenItemSub[15]; Wenn das Such Item angeklickt wird
_Menu($SuchenItemSub[15]); ... gehe zur Funktion
Case $GUI_Button02; Wenn der Suchen Knopf gedrückt wird ...
_Menu($GUI_Button02); gehe in die Funktion _Menu und übergeben den Case "$GUI_Button02"
EndSwitch
WEnd
- die Funktion _Menu sieht so aus
Spoiler anzeigen
Func _Menu($Case); Je nach Fall (Case), wird die Funktion unterschiedlich bestückt
If $Case = $WelcomeItem Then
ConsoleWrite("Willkommen wurde gedrückt" & @CRLF)
GUICtrlSetState($SuchenItem, $GUI_HIDE); verstecke die "Suche Dokumente auf"
GUICtrlSetState($ErstelleItem, $GUI_HIDE); verstecke die "BTZ erstellen auf"
GUICtrlSetState($FindeReadOnlyUserItem, $GUI_HIDE); verstecke die "Finde Benutzer mit Lesezugriff
_GUIChangeItems($SuchenItemLabel, $FindeReadOnlyUserLabel, $WelcomeItemLabel, $WelcomeItemLabel); Zeige die Willkommenseite im 3.Frame
; Erstelle den oberen Frame
$FrameOben = GUICtrlCreateLabel("", 241, 0, @DesktopWidth - 241, 91); $FrameOben wird erstellt - als Label
GUICtrlSetState($FrameOben, $GUI_DISABLE)
EndIf
If $Case = $SuchenItem Then
ConsoleWrite("Suche Dokumente auf wurde gedrückt" & @CRLF)
GUICtrlSetState($WelcomeItem, $GUI_HIDE); verstecke die "Willkommen"
GUICtrlSetState($ErstelleItem, $GUI_HIDE); verstecke die "BTZ erstellen auf"
GUICtrlSetState($FindeReadOnlyUserItem, $GUI_HIDE); verstecke die "Finde Benutzer mit Lesezugriff
_GUIChangeItems($WelcomeItemLabel, $FindeReadOnlyUserLabel, $SuchenItemLabel, $SuchenItemLabel); Wechsel zum Label für die Dokumentensuche
; Erstelle den oberen Frame
$FrameOben = GUICtrlCreateLabel("", 241, 0, @DesktopWidth - 241, 91); $FrameOben wird erstellt - als Label
GUICtrlSetState($FrameOben, $GUI_DISABLE)
;GUICtrlCreateCheckbox("Checkbox 1", 250, 30)
EndIf
If $Case = $SuchenItemSub[1] Then; DB1
$SelectedDatabase = "DB1"
$DBSelection = _DatabaseSelection($SelectedDatabase); Datenbankverbindung wird aufgebaut
EndIf
If $Case = $SuchenItemSub[2] Then; DB2
$SelectedDatabase = "DB2"
$DBSelection = _DatabaseSelection($SelectedDatabase); Datenbankverbindung wird aufgebaut
EndIf
If $Case = $GUI_Button02 Then; Wenn der Suchen Knopf gedrückt wird
ConsoleWrite("Combo2 ist " & GUICtrlRead($GUI_Combo02) & " Input1 ist " & GUICtrlRead($GUI_Input01) & @CRLF)
EndIf
EndFunc ;==>_Menu
Mein Problem ist jetzt $GUI_Button02. Hier sollte der ConsoleWrite ja erst erfolgen, wenn ich den Button drücke, aber ich sehe das hier gleich in die Console geschrieben wird, bevor ich den Knopf drücke. Ich vermute mal ein Layer 8 Hitze Problem
Danke für die Unterstützung