Register for your free account! | Forgot your password?

You last visited: Today at 08:47

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



Autoit !?

Discussion on Autoit !? within the Metin2 forum part of the Popular Games category.

Reply
 
Old   #1
 
°Metin2°'s Avatar
 
elite*gold: 0
Join Date: Oct 2008
Posts: 374
Received Thanks: 144
Post 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 !!!
°Metin2° is offline  
Old 05/23/2009, 19:32   #2
 
TheMan!!'s Avatar
 
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
TheMan!! is offline  
Thanks
1 User
Old 05/23/2009, 19:36   #3
 
°Metin2°'s Avatar
 
elite*gold: 0
Join Date: Oct 2008
Posts: 374
Received Thanks: 144
Danke es Klappt
°Metin2° is offline  
Reply




All times are GMT +1. The time now is 08:48.


Powered by vBulletin®
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2026 elitepvpers All Rights Reserved.