So nachdem meine Hilfedatei nun wieder geht zum Hauptproblem.
Ich habe gestern versucht eine Box mit 6 Buttons und 1 Label zu erstellen.
Wenn ein Button geklickt wird,ändert sich jeweils der Text im Label. ($Label1)
Danach wird der Text wieder zu $order.
Feinheiten und auch Winwaitactive ... folgen später es geht erstmal darum dass ich einen error bekomme wenn ich dieses Script starten möchte und ichw eiss nicht warum.
Die Buttons sollten doch nun schon sichbar sein egal ob sie was bewirken oder nicht.
Ich hoffe ihr findet den Fehler denn ich finde ihn leider nicht. :pinch:
Spoiler anzeigen
#include <GUIConstants.au3>
Dim $Case1
Dim $Case2
Dim $Case3
Dim $Case3.1
Dim $Case4
Dim $Case5
$Form1 = GUICreate("PassionofAnimes a.k.a Hydralisks Manager Tool", 640, 450, 193, 125)
$Label1 = GUICtrlCreateLabel("Programm is ready", 30, 430, 199, 17)
$Button1 = GUICtrlCreateButton("Anime Index", 92, 60, 200, 75, 0)
$Button2 = GUICtrlCreateButton("Listen my Music", 342, 60, 200, 75, 0)
$Button3 = GUICtrlCreateButton("Run Warcraft 3", 92, 180, 200, 75, 0)
$Button3.1 = GUICtrlCreateButton("Run Banlist", 342, 180, 200, 75, 0)
$Button4 = GUICtrlCreateButton("Run SWBF 2", 92, 300, 200, 75, 0)
$Button5 = GUICtrlCreateButton("Shutdown", 342, 300, 200, 75, 0)
$order = "Waiting for orders"
GUISetState(@SW_SHOW)
[/autoit] [autoit][/autoit] [autoit]While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE Then
Exit
;----------------------------------------------------------------------------------------------
Case $Button1 Then
$Case1 = True
Case $Case1 = True Then
GUICtrlSetData($Label1, "Opening Anime Index ...")
If $Case1 = True Then
$Case1 = False
EndIf
Sleep(500)
[/autoit] [autoit][/autoit] [autoit]If $Case1 = False Then
GUICtrlSetData($Label1, $order)
EndIf
;----------------------------------------------------------------------------------------------
Case $Button2 Then
$Case2 = True
Case $Case2 = True Then
GUICtrlSetData($Label1, "Opening Listen my Music ...")
If $Case2 = True Then
$Case2 = False
EndIf
Sleep(500)
[/autoit] [autoit][/autoit] [autoit]If $Case2 = False Then
GUICtrlSetData($Label1, $order)
EndIf
;----------------------------------------------------------------------------------------------
Case $Button3 Then
$Case3 = True
Case $Case3 = True Then
GUICtrlSetData($Label1, "Running Warcraft 3 ...")
If $Case3 = True Then
$Case3 = False
EndIf
Sleep(500)
[/autoit] [autoit][/autoit] [autoit]If $Case3 = False Then
GUICtrlSetData($Label1, $order)
EndIf
;----------------------------------------------------------------------------------------------
Case $Button3.1 Then
$Case3.1 = True
Case $Case3.1 = True Then
GUICtrlSetData($Label1, "Running Banlist ...")
If $Case 3.1 = True Then
$Case 3.1 = False
EndIf
Sleep(500)
[/autoit] [autoit][/autoit] [autoit]If $Case3.1 = False Then
GUICtrlSetData($Label1, $order)
EndIf
;----------------------------------------------------------------------------------------------
Case $Button4 Then
$Case4 = True
Case
$Case4 = True Then
GUICtrlSetData($Label1, "Running SWBF 2 ...")
If $Case4 = True Then
$Case4 = False
EndIf
Sleep(500)
[/autoit] [autoit][/autoit] [autoit]If $Case4 = False Then
GUICtrlSetData($Label1, $order)
EndIf
;----------------------------------------------------------------------------------------------
Case $Button5 Then
$Case5 = True
Case $Case5 = True Then
GUICtrlSetData($Label1, "Turning off ...")
If $Case5 = True Then
$Case5 = False
EndIf
Sleep(500)
[/autoit] [autoit][/autoit] [autoit]If $Case5 = False Then
GUICtrlSetData($Label1, $order)
EndIf
;----------------------------------------------------------------------------------------------
EndSwitch
WEnd