Gui Button

[BlindEagle]

Hi Com, hab mir grade mit KODA eine Gui gebastelt und möchte jetzt wenn jmd zB. "Button1" drückt aufgerufen wird...
Wie mache ich das?

[Freddy​]

in der While schleife

PHP Code:

Case $Button1
ShellExecute("www.google.com") 


[BlindEagle]

Ich bekomme den Fehler:


;### Tidy Error -> case is never closed in your script.

[Lawliet]

Select
Case $Button1
ShellExecute("Google.com")
Case $Button2
...
EndSelect


Nächste mal bei so einer kleinen Frage bitte dort posten:

[BlindEagle]

Sry ich bin bischen zu blöd das umzusetzen, und auf Wunsch schreib ich jetzt mal im Thread weiter...

hier ist der Code, Kann mir jmd dass so hinbasteln?

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
Opt("GUIOnEventMode", 1)
#Region ### START Koda GUI section ### Form=c:\users\blindeagle\desktop\jar moddden\travianschnellzugriff.kxf
$Form1_1 = GUICreate("Form1", 598, 421, 282, 127)
$Pic1 = GUICtrlCreatePic("C:\Users\BlindEagle\Desktop\jar moddden\travian_05.jpg", 0, 0, 617, 433)
$LoginButton = GUICtrlCreateButton("LoginButton", 32, 384, 137, 33)
GUICtrlSetOnEvent(-1, "LoginButtonClick")
$TTButton = GUICtrlCreateButton("Getter-Tools (TT", 240, 384, 137, 33)
GUICtrlSetOnEvent(-1, "TTButtonClick")
$InaktivenButton = GUICtrlCreateButton("Inaktiven-Liste", 424, 384, 137, 33)
GUICtrlSetCursor (-1, 2)
GUICtrlSetOnEvent(-1, "InaktivenButtonClick")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	Sleep(100)
WEnd

Func InaktivenButtonClick()

EndFunc
Func LoginButtonClick()

EndFunc
Func TTButtonClick()

EndFunc

[Lawliet]

Koda sollte dir eig. unter deinem GUI Code so eine Schleife generiert haben:

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit

	EndSwitch
WEnd

Unter das letzte "Case" kannst du nun Case $Button1 einfügen.
Die ControlID, in deinem Fall nun $Button1 findest du im GUI Code vor "= GUICtrlCreateButton".

Mach am besten ein paar anfänger Tutorials. Denn jede Kleinichkeit solltest du hier auch nicht fragen

[BlindEagle]

Komisch aber das hat es nicht....
den Code den ich gepostet habe is direkt vom Koda Output

[Lawliet]

Naja, dann füge einfach

$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit

	EndSwitch

in deine While Schleife ein.

[BlindEagle]

So hab ich :

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
Opt("GUIOnEventMode", 1)
#Region ### START Koda GUI section ### Form=c:\users\blindeagle\desktop\jar moddden\travianschnellzugriff.kxf
$Form1_1 = GUICreate("Form1", 598, 421, 282, 127)
$Pic1 = GUICtrlCreatePic("C:\Users\BlindEagle\Desktop\jar moddden\travian_05.jpg", 0, 0, 617, 433)
$LoginButton = GUICtrlCreateButton("LoginButton", 32, 384, 137, 33)
GUICtrlSetOnEvent(-1, "LoginButtonClick")
$TTButton = GUICtrlCreateButton("Getter-Tools (TT", 240, 384, 137, 33)
GUICtrlSetOnEvent(-1, "TTButtonClick")
$InaktivenButton = GUICtrlCreateButton("Inaktiven-Liste", 424, 384, 137, 33)
GUICtrlSetCursor (-1, 2)
GUICtrlSetOnEvent(-1, "InaktivenButtonClick")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	Sleep(100)
WEnd

Func InaktivenButtonClick()

EndFunc
Func LoginButtonClick()

EndFunc
Func TTButtonClick()

$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $LoginButton
			ShellExecute("wwww.Google.de")
			Exit

	EndSwitch
EndFunc

Es funzt aber immer noch nicht ...
Bin wahrscheinlich zu müde, Kannst du es schnell machen, ich setzt mich dann morgen nochmal dran und werd es versuchen nachzuvollziehen...

[Lawliet]

Originally Posted by Lawliet!

Naja, dann füge einfach

$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit

	EndSwitch

in deine While Schleife ein.

Ne, learning by doing^^

[BlindEagle]

Ja aber da passiert ja nix wenn ich das in die schleife einfüge.....
Probier mal bei dir aus ob es bei dir geht

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
Opt("GUIOnEventMode", 1)
#Region ### START Koda GUI section ### Form=c:\users\blindeagle\desktop\jar moddden\travianschnellzugriff.kxf
$Form1_1 = GUICreate("Form1", 598, 421, 282, 127)
$Pic1 = GUICtrlCreatePic("C:\Users\BlindEagle\Desktop\jar moddden\travian_05.jpg", 0, 0, 617, 433)
$LoginButton = GUICtrlCreateButton("LoginButton", 32, 384, 137, 33)
$TTButton = GUICtrlCreateButton("Getter-Tools (TT", 240, 384, 137, 33)
$InaktivenButton = GUICtrlCreateButton("Inaktiven-Liste", 424, 384, 137, 33)
GUICtrlSetCursor (-1, 2)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	Sleep(100)
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Case $LoginButton
			ShellExecute("www.Google.de")
			Exit

	EndSwitch
WEnd

EDIT: Habs jetzt bestimmt über 50mal andere Kombinationen probiert nix geht -.-

[Lawliet]

Case $LoginButton
ShellExecute("www.Google.de")

Unter das Exit.
Eine Switch Schleife ist immer so aufgebaut:
Switch <expression>
Case $button1
-tudas-
Case $button2
-tudies-
EndSwitch

[BlindEagle]

Originally Posted by Lawliet!

Case $LoginButton
ShellExecute("www.Google.de")

Unter das Exit.
Eine Switch Schleife ist immer so aufgebaut:
Switch <expression>
Case $button1
-tudas-
Case $button2
-tudies-
EndSwitch

Ah also Case $LoginButton einfach unter machen

While 1
	Sleep(100)
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
			Case $LoginButton
ShellExecute("www.Google.de")

	EndSwitch
WEnd

geht aber immer noch nicht, hab das gefühl man kann nicht auf die draufklicken :O

EDIT: Es liegt wirklich an den Buttons -.- Iwie is draufklciken deaktiviert :O

EDIT2: Das problem liegt am Bild, man muss es auf "Enabled: false" setzen damit es funktioniert, ansonsten kann man die Buttons nicht drücken, keine Angst das Bild sieht man trotzdem

Vielen dank an alle Helfer, Funktioniert jetzt

[Lawliet]

#closed