Register for your free account! | Forgot your password?

Go Back   elitepvpers > Coders Den > AutoIt
You last visited: Today at 05:49

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

Advertisement



brauche kleine hilfe

Discussion on brauche kleine hilfe within the AutoIt forum part of the Coders Den category.

Reply
 
Old   #1
 
omer36's Avatar
 
elite*gold: 0
Join Date: Mar 2009
Posts: 2,317
Received Thanks: 1,254
brauche kleine hilfe

ich hab mal ein kleine tool geschrieben, und komme an der stelle nicht weiter:

PHP Code:
    GUICtrlSetData($edit1"MouseClick("&"left"&" , "$pos[0] &", "$pos[1] &", 1)"
es will einfach nicht "left" mit den "" schreiben....
wie mach ich das?

und 2. wie kann ich es machen, das wenn es die sachen in die editbox schreibt, bei jeden weiteren "TAB" drücken eine zeile drunter das nächste kommt?

bisjetz komplette source:

PHP Code:
#include <Misc.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ###
$Form1_1 GUICreate("Form1"355154211154)
$Label1 GUICtrlCreateLabel("X-Achse"484417)
$Label2 GUICtrlCreateLabel("Y-Achse"4364417)
$Label3 GUICtrlCreateLabel("Farbe"4723117)
$input1 GUICtrlCreateInput(""56410121)
$input2 GUICtrlCreateInput(""563210121)
$input3 GUICtrlCreateInput(""566810121)
$edit1 GUICtrlCreateEdit(""1722417785)
$Label4 GUICtrlCreateLabel("Bitte drücken Sie die TAB-Taste um die Position und Farbe zu speichern!"412034717)
$Option GUICtrlCreateCombo("Option"172017325)
GUICtrlSetData(-1"MouseClick()")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

    EndSwitch
    
start()
WEnd

Func start
()
$pos MouseGetPos()
$farbe PixelGetColor($pos[0], $pos[1])
GUICtrlSetData($input1$pos[0])
GUICtrlSetData($input2$pos[1])
GUICtrlSetData($input3"0x" Hex($farbe6))

$dll DllOpen("user32.dll")
If 
_IsPressed("09"$dllThen
If GUICtrlRead($Option) =  "option" Then
    GUICtrlSetData
($edit1$pos[0] & @CRLF $pos[1] & @CRLF  & @CRLF "0x" Hex($farbe6))
ElseIf 
GUICtrlRead($Option) =  "MouseClick()" Then
    GUICtrlSetData
($edit1"MouseClick("&"left"&" , "$pos[0] &", "$pos[1] &", 1)")
EndIf
EndIf

DllClose($dll)
EndFunc 
MfG
omer36 is offline  
Old 07/29/2010, 18:38   #2
 
Shadow992's Avatar
 
elite*gold: 77
Join Date: May 2008
Posts: 5,430
Received Thanks: 5,876
Quote:
Originally Posted by omer36 View Post
ich hab mal ein kleine tool geschrieben, und komme an der stelle nicht weiter:

PHP Code:
    GUICtrlSetData($edit1"MouseClick("&"left"&" , "$pos[0] &", "$pos[1] &", 1)"
es will einfach nicht "left" mit den "" schreiben....
wie mach ich das?

und 2. wie kann ich es machen, das wenn es die sachen in die editbox schreibt, bei jeden weiteren "TAB" drücken eine zeile drunter das nächste kommt?

bisjetz komplette source:

PHP Code:
#include <Misc.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ###
$Form1_1 GUICreate("Form1"355154211154)
$Label1 GUICtrlCreateLabel("X-Achse"484417)
$Label2 GUICtrlCreateLabel("Y-Achse"4364417)
$Label3 GUICtrlCreateLabel("Farbe"4723117)
$input1 GUICtrlCreateInput(""56410121)
$input2 GUICtrlCreateInput(""563210121)
$input3 GUICtrlCreateInput(""566810121)
$edit1 GUICtrlCreateEdit(""1722417785)
$Label4 GUICtrlCreateLabel("Bitte drücken Sie die TAB-Taste um die Position und Farbe zu speichern!"412034717)
$Option GUICtrlCreateCombo("Option"172017325)
GUICtrlSetData(-1"MouseClick()")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

    EndSwitch
    
start()
WEnd

Func start
()
$pos MouseGetPos()
$farbe PixelGetColor($pos[0], $pos[1])
GUICtrlSetData($input1$pos[0])
GUICtrlSetData($input2$pos[1])
GUICtrlSetData($input3"0x" Hex($farbe6))

$dll DllOpen("user32.dll")
If 
_IsPressed("09"$dllThen
If GUICtrlRead($Option) =  "option" Then
    GUICtrlSetData
($edit1$pos[0] & @CRLF $pos[1] & @CRLF  & @CRLF "0x" Hex($farbe6))
ElseIf 
GUICtrlRead($Option) =  "MouseClick()" Then
    GUICtrlSetData
($edit1"MouseClick("&"left"&" , "$pos[0] &", "$pos[1] &", 1)")
EndIf
EndIf

DllClose($dll)
EndFunc 
MfG
So:

PHP Code:
#include <Misc.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ###
$Form1_1 GUICreate("Form1"355154211154)
$Label1 GUICtrlCreateLabel("X-Achse"484417)
$Label2 GUICtrlCreateLabel("Y-Achse"4364417)
$Label3 GUICtrlCreateLabel("Farbe"4723117)
$input1 GUICtrlCreateInput(""56410121)
$input2 GUICtrlCreateInput(""563210121)
$input3 GUICtrlCreateInput(""566810121)
$edit1 GUICtrlCreateEdit(""1722417785)
$Label4 GUICtrlCreateLabel("Bitte drücken Sie die TAB-Taste um die Position und Farbe zu speichern!"412034717)
$Option GUICtrlCreateCombo("Option"172017325)
GUICtrlSetData(-1"MouseClick()")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

    EndSwitch
    
start()
WEnd

Func start
()
$pos MouseGetPos()
$farbe PixelGetColor($pos[0], $pos[1])
GUICtrlSetData($input1$pos[0])
GUICtrlSetData($input2$pos[1])
GUICtrlSetData($input3"0x" Hex($farbe6))

$dll DllOpen("user32.dll")
If 
_IsPressed("09"$dllThen
If GUICtrlRead($Option) =  "option" Then
    GUICtrlSetData
($edit1$pos[0] & @CRLF $pos[1] & @CRLF  & @CRLF "0x" Hex($farbe6))
ElseIf 
GUICtrlRead($Option) =  "MouseClick()" Then
    GUICtrlSetData
($edit1"MouseClick("&'"left"'&" , "$pos[0] &", "$pos[1] &", 1)")
EndIf
EndIf

DllClose($dll)
EndFunc 
Shadow992 is offline  
Thanks
1 User
Old 07/29/2010, 18:48   #3
 
omer36's Avatar
 
elite*gold: 0
Join Date: Mar 2009
Posts: 2,317
Received Thanks: 1,254
ahh danke...
weisst du vllt noch was zu meiner 2. frage?


wenn ich den "GUICtrlSetData" default-wert auf 1 setzte schreibt es das eine in 24zeilen.. -.-
will mit jedem tastendrück (TAB) in die nächste zeile schreiben...
omer36 is offline  
Old 07/29/2010, 18:58   #4
 
Shadow992's Avatar
 
elite*gold: 77
Join Date: May 2008
Posts: 5,430
Received Thanks: 5,876
Quote:
Originally Posted by omer36 View Post
ahh danke...
weisst du vllt noch was zu meiner 2. frage?


wenn ich den "GUICtrlSetData" default-wert auf 1 setzte schreibt es das eine in 24zeilen.. -.-
will mit jedem tastendrück (TAB) in die nächste zeile schreiben...
So?
PHP Code:
#include <Misc.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ###
$Form1_1 GUICreate("Form1"355154211154)
$Label1 GUICtrlCreateLabel("X-Achse"484417)
$Label2 GUICtrlCreateLabel("Y-Achse"4364417)
$Label3 GUICtrlCreateLabel("Farbe"4723117)
$input1 GUICtrlCreateInput(""56410121)
$input2 GUICtrlCreateInput(""563210121)
$input3 GUICtrlCreateInput(""566810121)
$edit1 GUICtrlCreateEdit(""1722417785)
$Label4 GUICtrlCreateLabel("Bitte drücken Sie die TAB-Taste um die Position und Farbe zu speichern!"412034717)
$Option GUICtrlCreateCombo("Option"172017325)
GUICtrlSetData(-1"MouseClick()")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

    EndSwitch
    
start()
WEnd

Func start
()
$pos MouseGetPos()
$farbe PixelGetColor($pos[0], $pos[1])
GUICtrlSetData($input1$pos[0])
GUICtrlSetData($input2$pos[1])
GUICtrlSetData($input3"0x" Hex($farbe6))

$dll DllOpen("user32.dll")
If 
_IsPressed("09"$dllThen
If GUICtrlRead($Option) =  "option" Then
    GUICtrlSetData
($edit1GUICtrlRead($edit1)&$pos[0] & @CRLF $pos[1] & @CRLF  & @CRLF "0x" Hex($farbe6)&@CRLF&@CRLF)
ElseIf 
GUICtrlRead($Option) =  "MouseClick()" Then
    GUICtrlSetData
($edit1GUICtrlRead($edit1)&"MouseClick("&'"left"'&" , "$pos[0] &", "$pos[1] &", 1)"&@CRLF&@CRLF)
EndIf
sleep(300)
EndIf

DllClose($dll)
EndFunc 
Shadow992 is offline  
Thanks
1 User
Old 07/29/2010, 19:06   #5
 
omer36's Avatar
 
elite*gold: 0
Join Date: Mar 2009
Posts: 2,317
Received Thanks: 1,254
ja genau...

danke dir ^^
omer36 is offline  
Reply


Similar Threads Similar Threads
brauche mal ne kleine schnelle hilfe :D
08/06/2010 - 4Story - 0 Replies
Also ich fände es nett wenn mir mal jemand den normalen Tclient(kein bypass) zum downloaden postet, weil ich hab ausversen den bypass mit dem normalen download link ersetzt und nun ist der weg. da ich das spiel net neu downloaden will wärs gut wenn ihr den mal postet :D :rolleyes:
Brauche eine kleine Hilfe
02/04/2010 - Metin2 Private Server - 2 Replies
Also es geht um den HP Script von Lucy od. Blodas halt. Man hat da ja die 4 x config daten player, common, account und config die Ip ist ja klar root und pw auch doch mysql_db was kommt dahin ? Weil hab die page auf den webspace hochgeladen doch in die datenbank kommt er nicht rein..
Brauche Kleine Hilfe
11/11/2009 - Metin2 Private Server - 4 Replies
hey hab ne frage bei item_attr sind doch die ganzen bonis wollte fragen was zauber geschwindigkeit ist währe echt geil wen mit des einer sagen würde krieg ein THx=))) push man kennt keiner des oder was-.-
Brauche eine kleine Hilfe
10/28/2009 - Metin2 Private Server - 5 Replies
Hi Com, ich habe mir eine eigene exe erstellt doch wenn man was schreibt und das geschriebene Wiederholen möchte durch die Pfeiltaste geht es nicht. Jetzt frage ich euch gibt es eine möglichkeit das hinzubekommen muss ich da irgendeine Datei einfügen? Wäre über Antworten sehr erfreut ;)
Kleine Statd brauche Hilfe
11/27/2008 - General Gaming Discussion - 1 Replies
Also wen bei mir zu viele auf diesen Link klicken kommt immer ein Fenster da muss man ein Code eingeben kann man den Code irgent wie umgehen ?



All times are GMT +2. The time now is 05:49.


Powered by vBulletin®
Copyright ©2000 - 2024, 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 ©2024 elitepvpers All Rights Reserved.