[GUI|Problem] Maus bewegen auf Knopfdruck

piper332 · 05/30/2012, 08:50

Hey, ich wollte meine Maus zu den Koordinaten bewegen lassen, die in die Inputs eingegeben wurden. Das funktioniert aber iwie nicht. Ich weiß nicht, was ich falsch gemacht habe, ich hoffe jmd. von euch weiß es =)
Code:

Spoiler

Shrezz · 05/30/2012, 09:48

So funktioniert es:

Spoiler

Nur verstehe ich nicht

Code:

Case $Mausz = 4

, was willst du damit bezwecken?

piper332 · 05/30/2012, 14:49

Naja.. Wenn man Das mit dem Tooltip an hatte und den Haken dann bei der Checkbox weg macht, bleibt der einfach stehn und zeigt die letzten Werte an.
Damit wird der halt weg gemacht...
Wusste nicht, wie ich es anders Lösen sollte, klappt aber..
Danke Erstmal.. ich versuch zu verstehn wo der Fehler war =P

Shrezz · 05/30/2012, 17:19

Edit: KDeluxe hat die richtige Lösung!

KDeluxe · 05/30/2012, 18:52

Quote:
Originally Posted by Shrezz
Nur verstehe ich nicht
Code:
Case $Mausz = 4
, was willst du damit bezwecken?

4 entspricht $GUI_UNCHECKED, der zurückgegebene Status/Wert von GUICtrlRead(), wenn eine Checkbox nicht ausgewählt wurde. Warum er das macht hat er ja schon geschrieben.

Kommen wir mal zur einfachen Lösung:

Spoiler

Alles geändert werden musste war die Positionierung der Abfrage, ob $msg gleich $but ist.
Der Fehler bestand darin, dass die Abfrage, ob $msg gleich $but ist, nach der Überprüfung der Checkbox kam. Die Checkbox kann in diesem Fall 2 Werte annehmen, einmal $GUI_CHECKED (1) und $GUI_UNCHECKED (4). Da einer dieser beiden Bedingungen immer erfüllt wird, werden unten folgende Case-Statements "ignoriert".

Code:

Case $Mausz

Auf diesen Teil aus Shrezzs Script sollte man auf jeden Fall verzichten. Hier wird abgefragt, ob die Checkbox den Wert "True" annimmt. "False" entspricht 0, "True" entspricht allen Zahlen mit Ausnahme von 0. Da die Checkbox den Wert 0 nie annimmt, wird das Tooltip nach dem erstellen gleich wieder gelöscht.

Außerdem müsstest du das Flimmern/Flackern der Label schon bemerkt haben. Deshalb solltest du immer ein beachten: Ändere nie etwas unnötig.
Zur CPU Entlastung solltest du außerdem ein kleines Sleep von 10 bis 50 ms Verwenden. Höhere Werte verursachen nur verzögerte Reaktionen der GUI-Elemente.

Hier mal ein Beispiel, wie es besser gemacht ist:

Spoiler

Bei Unklarheiten kannst du dich ja rühren (PNs an mich ignoriere ich übrigens).

Shrezz · 05/30/2012, 19:05

Quote:
Originally Posted by KDeluxe
4 entspricht $GUI_UNCHECKED, der zurückgegebene Status/Wert von GUICtrlRead(), wenn eine Checkbox nicht ausgewählt wurde. Warum er das macht hat er ja schon geschrieben.

Kommen wir mal zur einfachen Lösung:
Spoiler
Code:
#RequireAdmin
Dim $xy
Global $xread=0,$yread=0
$Gui = GUICreate("NosBot", 250, 250, 500, 250)
$leer = GUICtrlCreateCheckbox("Am Mauszeiger anzeigen",10,120,130,20)
$label = GUICtrlCreateLabel("x: ",50, 10, 70, 35)
GUICTRLSETFONT(-1,15,800,5)
$label2 = GUICtrlCreateLabel("y: ",140, 10, 70, 35)
GUICTRLSETFONT(-1,15,800,5)
$input = GUICtrlCreateInput("",50,50,58,25)
$input2 = GUICtrlCreateInput("",140,50,58,25)
GUICtrlCreateLabel("x: ",38, 53, 10, 20)
GUICTRLSETFONT(-1,10,800)
GUICtrlCreateLabel("y: ",128, 53, 10, 20)
GUICTRLSETFONT(-1,10,800)
$but=GUICtrlCreateButton("Bewegen!",38,80,162,20)

GUISetState()
While 1
	$Mausz = GUICtrlRead($leer)
	$msg = GUIGetMsg()
	Select
		Case $msg = -3
			ExitLoop

		Case $msg=$but
			$xread=GUICtrlRead($input)
			$yread=GUICtrlRead($input2)
			MouseMove($xread,$yread,900)

		Case $Mausz = 1
			ToolTip("x:" & $xy[0] & " y:" & $xy[1])

		Case $Mausz = 4
			ToolTip("",0,0)
	EndSelect

	$xy = MouseGetPos()
	GUICtrlSetData($label, "x: " & $xy[0])
	GUICtrlSetData($label2, "y: " & $xy[1])
WEnd
Alles geändert werden musste war die Positionierung der Abfrage, ob $msg gleich $but ist.
Der Fehler bestand darin, dass die Abfrage, ob $msg gleich $but ist, nach der Überprüfung der Checkbox kam. Die Checkbox kann in diesem Fall 2 Werte annehmen, einmal $GUI_CHECKED (1) und $GUI_UNCHECKED (4). Da einer dieser beiden Bedingungen immer erfüllt wird, werden unten folgende Case-Statements "ignoriert".
Code:
Case $Mausz
Auf diesen Teil aus Shrezzs Script sollte man auf jeden Fall verzichten. Hier wird abgefragt, ob die Checkbox den Wert "True" annimmt. "False" entspricht 0, "True" entspricht allen Zahlen mit Ausnahme von 0. Da die Checkbox den Wert 0 nie annimmt, wird das Tooltip nach dem erstellen gleich wieder gelöscht.

Außerdem müsstest du das Flimmern/Flackern der Label schon bemerkt haben. Deshalb solltest du immer ein beachten: Ändere nie etwas unnötig.
Zur CPU Entlastung solltest du außerdem ein kleines Sleep von 10 bis 50 ms Verwenden. Höhere Werte verursachen nur verzögerte Reaktionen der GUI-Elemente.

Hier mal ein Beispiel, wie es besser gemacht ist:
Spoiler
Code:
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>

GUICreate("", 100, 125)
$lbl_CursorX	= GUICtrlCreateLabel("X", 5,  5, 90)
$lbl_CursorY	= GUICtrlCreateLabel("Y", 5, 25, 90)
$inp_PointX		= GUICtrlCreateInput("0", 5, 45, 90, 21, $ES_NUMBER)
$inp_PointY		= GUICtrlCreateInput("0", 5, 70, 90, 21, $ES_NUMBER)
$btn_MoveCursor	= GUICtrlCreateButton("Bewegen", 5, 95, 90)
GUISetState()

Do
	$nMsg = GUIGetMsg()
	If $nMsg == $btn_MoveCursor Then
		$nPointX = GUICtrlRead($inp_PointX)
		$nPointY = GUICtrlRead($inp_PointY)

;~ 		If (($nPointX >= 0) And ($nPointX <= @DesktopWidth)) Then
;~ 			If (($nPointY >= 0) And ($nPointY <= @DesktopHeight)) Then
				MouseMove($nPointX, $nPointY)
;~ 			EndIf
;~ 		EndIf
	EndIf

	$nCursorPos = MouseGetPos()
	$nCursorX = GUICtrlRead($lbl_CursorX)
	$nCursorY = GUICtrlRead($lbl_CursorY)

	If Not ($nCursorX == $nCursorPos[0]) Then _
		GUICtrlSetData($lbl_CursorX, $nCursorPos[0])

	If Not ($nCursorY == $nCursorPos[1]) Then _
		GUICtrlSetData($lbl_CursorY, $nCursorPos[1])

	Sleep(50)
Until $nMsg == $GUI_EVENT_CLOSE
Bei Unklarheiten kannst du dich ja rühren (PNs an mich ignoriere ich übrigens).

Ok danke, so hab ich jetzt auch was gelernt(: