Skrypt w AutoIT

Dyskusje o programach i sprzęcie komputerowym oraz mobilnym, a także internet i ogólne problemy.

Moderatorzy: Moderatorzy, Admini

Awatar użytkownika
ArtekXDPL
Seryjny zabójca
Posty: 461
Rejestracja: 16 maja 2009, 23:30
Lokalizacja: Przemyśl

16 kwie 2015, 09:48

Mam oto taki prosty skrypt i chcę dodać do niego kilka funkcji a mianowicie:
Gdy wpiszę w pole "imput_1" dowolny tekst, chcę aby po naciśnięciu F1 skrypt w miejscu "Send()" wpisał zawartość pola "imput_1".

Kod: Zaznacz cały

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=C&#58;\Users\Artek\Desktop\test10.kxf
GUICreate&#40;"Bitdebrid.com - DOWNLOADER", 393, 120, 190, 122&#41;
$Link01 = GUICtrlCreateInput&#40;"", 8, 8, 233, 25&#41;
$Link02 = GUICtrlCreateInput&#40;"", 8, 48, 233, 25&#41;
$Link03 = GUICtrlCreateInput&#40;"", 8, 88, 233, 25&#41;
GUICtrlCreateButton&#40;"DOWNLOAD", 256, 8, 129, 25&#41;
GUICtrlCreateButton&#40;"DOWNLOAD", 256, 48, 129, 25&#41;
GUICtrlCreateButton&#40;"DOWNLOAD", 256, 88, 129, 25&#41;
GUISetState&#40;@SW_SHOW&#41;
#EndRegion ### END Koda GUI section ###

HotKeySet&#40;"&#123;F1&#125;",  		"Pobieranie"&#41;
HotKeySet&#40;"&#123;ESC&#125;",  	"Pauza"&#41;
HotKeySet&#40;"&#123;NUMPAD1&#125;", 	"Wyjscie"&#41;

Global $Pause = false

Func Pauza&#40;&#41;
	$Pause = False
	While $Pause = False
		Sleep&#40;500&#41;
	WEnd
 EndFunc

Func Pobieranie&#40;&#41;
MouseClick&#40;"left", 955, 670&#41;; PUSTE POLE
Send&#40;&#41;
MouseClick&#40;"left", 955, 710&#41;; DOWNLOAD #1
Sleep&#40;5000&#41;
EndFunc

Func Wyjscie&#40;&#41;
Exit
EndFunc

While 1
	$nMsg = GUIGetMsg&#40;&#41;
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit

	EndSwitch
WEnd

While 1
Sleep&#40;1000&#41;
WEnd
Ostatnio zmieniony 16 kwie 2015, 09:49 przez ArtekXDPL, łącznie zmieniany 1 raz.


Umieram i powstaje z popiołów jak Phoenix, już od stuleci.
Awatar użytkownika
Tiquill
V.I.P.
V.I.P.
Posty: 14479
Rejestracja: 25 sty 2007, 02:00
Lokalizacja: z naprzeciwka
Postawił piwo: 1 raz
Otrzymał  piwo: 1 raz
Kontakt:

16 kwie 2015, 17:58

Przeniosłem z MHP do właściwego działu.


Zawsze jest ryzyko, że wyczerpałeś już limit dobrych dni i czeka cię już tylko samo zło...
Obrazek
ODPOWIEDZ