(Anfänger) Hilfe zu AutoIt

09/12/2010 10:07 hakunaaa#1
'n schönen guten Morgen allerseits!

Das hier ist mein erstes Topic im Forum und es geht direkt mit einer Frage los...

Seit ein Paar Wochen beschäftige ich mich nebenbei mit AutoIt. Klappt auch dank guter Tutorials ganz gut. Heute wollte ich einmal ausprobieren, meinen Funktionen ein Koda GUI zuzuweisen. Das erstellen vom GUI ging auch problemlos, nur will es mir einfach nicht gelingen, dem GUI die passenden Funktionen hinzuzufügen! Ich hoffe ihr könnt mir dabei helfen.

Das hier ist das GUI
Code:
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Pixelsearch", 334, 302, 192, 124)
$Button1 = GUICtrlCreateButton("Start", 64, 72, 97, 65)
$Button2 = GUICtrlCreateButton("Beenden", 168, 72, 97, 65)
$Button3 = GUICtrlCreateButton("1. Farbe", 80, 144, 75, 25)
$Button4 = GUICtrlCreateButton("2. Farbe", 176, 144, 75, 25)
$Button5 = GUICtrlCreateButton("Bereich 1", 80, 176, 75, 25)
$Button6 = GUICtrlCreateButton("Bereich 2", 176, 176, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

	EndSwitch
WEnd
#endregion
Ich möchte Button1 folgende Funktion zuweisen:

Code:
Func _Start()
	While 1
		$pixCord = PixelSearch($ObenX,$ObenY,$UntenX,$UntenY,$FC,1,2)
		if not @error then MouseClick('left',$pixCord[0], $pixCord[1],1,1)
		   
		$pixCord = PixelSearch($ObenX,$ObenY,$UntenX,$UntenY,$SC,1,2)
		if not @error then MouseClick('left',$pixCord[0], $pixCord[1],1,1)
	WEnd
EndFunc
jeder Versuch ging daneben. Bisher habe ich alles per Hotkeys gelöst, aber son GUI wäre doch schon was schönes!

Danke schonmal!
09/12/2010 10:23 DraaaKe#2
so wäre es am einfachsten:

Code:
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Pixelsearch", 334, 302, 192, 124)
$Button1 = GUICtrlCreateButton("Start", 64, 72, 97, 65)
$Button2 = GUICtrlCreateButton("Beenden", 168, 72, 97, 65)
$Button3 = GUICtrlCreateButton("1. Farbe", 80, 144, 75, 25)
$Button4 = GUICtrlCreateButton("2. Farbe", 176, 144, 75, 25)
$Button5 = GUICtrlCreateButton("Bereich 1", 80, 176, 75, 25)
$Button6 = GUICtrlCreateButton("Bereich 2", 176, 176, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
                Case $Button1
                       While 1
		$pixCord = PixelSearch($ObenX,$ObenY,$UntenX,$UntenY,$FC,1,2)
		if not @error then MouseClick('left',$pixCord[0], $pixCord[1],1,1)
		   
		$pixCord = PixelSearch($ObenX,$ObenY,$UntenX,$UntenY,$SC,1,2)
		if not @error then MouseClick('left',$pixCord[0], $pixCord[1],1,1)
	                WEnd

	EndSwitch
WEnd
#endregion
09/12/2010 10:31 iDunnoi#3
naja @vorposter stimmt schon wie dus gemacht hast, würd aber der übersicht halber in ne extra funktion nehmen.
09/12/2010 10:33 staRRFreak#4
[Only registered and activated users can see links. Click Here To Register...]

wen du das was auf dem bild steht machst hast du dann im autoit Quelltext folgendes stehen


und bei dir musst es dann so sein denke ich mal