|
You last visited: Today at 08:47
Advertisement
Autoit !?
Discussion on Autoit !? within the Metin2 forum part of the Popular Games category.
05/23/2009, 19:23
|
#1
|
elite*gold: 0
Join Date: Oct 2008
Posts: 374
Received Thanks: 144
|
Autoit !?
Hallo,
Habe das hier gescripted.
Quote:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=C:\Dokumente und Einstellungen\123\Desktop\Alles\dAMON sCHWULER oRDNER\Koda\Forms\Form1meins.kxf
$Form1 = GUICreate("Form1", 446, 197, 192, 124)
$Textprogramm = GUICtrlCreateLabel("Textprogramm", 144, 16, 147, 27)
GUICtrlSetFont(-1, 12, 800, 4, "Arial Black")
GUICtrlSetColor(-1, 0x008000)
$Input1 = GUICtrlCreateInput("Hier eingeben", 88, 96, 257, 24, BitOR($ES_CENTER,$ES_AUTOHSCROLL), BitOR($WS_EX_CLIENTEDGE,$WS_EX_STATICEDGE))
GUICtrlSetFont(-1, 8, 800, 0, "Comic Sans MS")
$Button1 = GUICtrlCreateButton("Button1", 0, 120, 9, 1, 0)
$Start = GUICtrlCreateButton("Start", 0, 128, 441, 65, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Start
While 1
Sleep (1000)
Send ($Input1)
WEnd
EndSwitch
WEnd
|
Aber bei mir schreibt er wenn ich das Programm öffne immer
die Zahl "4" aber ich weis nicht warum könnt ihr mir bitte helfen -.-
Danke !!!
|
|
|
05/23/2009, 19:32
|
#2
|
elite*gold: 0
Join Date: Sep 2008
Posts: 710
Received Thanks: 933
|
Du musst einfach "GUICtrlRead" vor Input1 schreiben
Quote:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=C:\Dokumente und Einstellungen\123\Desktop\Alles\dAMON sCHWULER oRDNER\Koda\Forms\Form1meins.kxf
$Form1 = GUICreate("Form1", 446, 197, 192, 124)
$Textprogramm = GUICtrlCreateLabel("Textprogramm", 144, 16, 147, 27)
GUICtrlSetFont(-1, 12, 800, 4, "Arial Black")
GUICtrlSetColor(-1, 0x008000)
$Input1 = GUICtrlCreateInput("Hier eingeben", 88, 96, 257, 24, BitOR($ES_CENTER,$ES_AUTOHSCROLL), BitOR($WS_EX_CLIENTEDGE,$WS_EX_STATICEDGE))
GUICtrlSetFont(-1, 8, 800, 0, "Comic Sans MS")
$Button1 = GUICtrlCreateButton("Button1", 0, 120, 9, 1, 0)
$Start = GUICtrlCreateButton("Start", 0, 128, 441, 65, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Start
While 1
Sleep (1000)
Send (GUICtrlRead($Input1))
WEnd
EndSwitch
WEnd
|
|
|
|
05/23/2009, 19:36
|
#3
|
elite*gold: 0
Join Date: Oct 2008
Posts: 374
Received Thanks: 144
|
Danke es Klappt
|
|
|
All times are GMT +1. The time now is 08:48.
|
|