|
You last visited: Today at 10:33
Advertisement
[QUESTION]Wie kann ich...
Discussion on [QUESTION]Wie kann ich... within the AutoIt forum part of the Coders Den category.
08/02/2011, 11:22
|
#1
|
elite*gold: 0 
Join Date: Jun 2011
Posts: 49
Received Thanks: 17
|
[QUESTION]Wie kann ich...
Hallo,
Ich wollte fragen, wie ich es hinbekomme das Ich auf einen Button Klicke und das Programm das Passwort speichert?
Also Script:
PHP Code:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("S4League Trainer", 335, 239, 195, 127, $WS_SYSMENU, $WS_EX_TOPMOST)
$Tab1 = GUICtrlCreateTab(0, 0, 329, 233)
$TabSheet1 = GUICtrlCreateTabItem("Trainer")
$Checkbox1 = GUICtrlCreateCheckbox("1Hit", 4, 25, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlSetState(-1, $GUI_DISABLE)
$Checkbox2 = GUICtrlCreateCheckbox("Fast Fire", 108, 25, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlSetState(-1, $GUI_DISABLE)
$Checkbox3 = GUICtrlCreateCheckbox("...", 212, 25, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlSetState(-1, $GUI_DISABLE)
$Checkbox4 = GUICtrlCreateCheckbox("Inf SP Skill", 4, 57, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox5 = GUICtrlCreateCheckbox("0 Accuracy", 108, 57, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox6 = GUICtrlCreateCheckbox("X-Ray", 212, 57, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox7 = GUICtrlCreateCheckbox("...", 4, 89, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox8 = GUICtrlCreateCheckbox("...", 108, 89, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox9 = GUICtrlCreateCheckbox("...", 212, 89, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Input1 = GUICtrlCreateInput("", 44, 113, 217, 22, BitOR($GUI_SS_DEFAULT_INPUT,$ES_CENTER,$ES_PASSWORD))
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button1 = GUICtrlCreateButton("Start", 4, 137, 121, 33)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button2 = GUICtrlCreateButton("Check Passwort", 172, 137, 121, 33)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button4 = GUICtrlCreateButton("Passwort speichern", 64, 178, 161, 33)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlSetState(-1, $GUI_DISABLE)
$TabSheet2 = GUICtrlCreateTabItem("Credits")
$Label1 = GUICtrlCreateLabel("Coded by >:-{Scâréd}-:< and ...", 4, 17, 309, 36)
GUICtrlSetFont(-1, 18, 800, 6, "Curlz MT")
$Label2 = GUICtrlCreateLabel("GUI by >:-{Scâréd}-:<", 36, 57, 245, 33)
GUICtrlSetFont(-1, 16, 800, 2, "Kristen ITC")
$Label3 = GUICtrlCreateLabel(">:-{Scâréd}-:<", 76, 97, 166, 39)
GUICtrlSetFont(-1, 20, 800, 2, "Palatino Linotype")
$Label4 = GUICtrlCreateLabel("and", 132, 137, 49, 38)
GUICtrlSetFont(-1, 16, 800, 2, "Segoe Script")
$Label5 = GUICtrlCreateLabel("...", 140, 185, 22, 31)
GUICtrlSetFont(-1, 16, 800, 2, "Tempus Sans ITC")
$TabSheet3 = GUICtrlCreateTabItem("Homepages")
$Button3 = GUICtrlCreateButton("Hompage in Epvp >:-{Scâréd}-:<", 12, 25, 305, 89)
GUICtrlSetFont(-1, 16, 800, 2, "Matisse ITC")
GUICtrlCreateTabItem("")
GUISetState()
#EndRegion ### END Koda GUI section ###
Do
Sleep(10)
Until GUIGetMsg() == -3
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button4
MsgBox(64,"","Das Passwort wurde gespeichert")
Case $Button2
If GUICtrlRead($Input1) = "mrmuni" Then
MsgBox(64,"","Das Passwort ist richtig")
GUICtrlSetState($Checkbox1, $GUI_ENABLE)
GUICtrlSetState($Checkbox2, $GUI_ENABLE)
GUICtrlSetState($Checkbox3, $GUI_ENABLE)
GUICtrlSetState($Button4, $GUI_ENABLE)
Else
MsgBox(64,"","Das Passwort ist falsch")
EndIf
Case $Button1
ToolTip("Starte S4League",0,0)
If ProcessWait("S4Client.exe") Then
ToolTip("S4League wurde gefunden... Der Trainer schließt sich",0,0)
Sleep(3000)
Exit
EndIf
Case $Button3
ShellExecute("http://www.elitepvpers.com/forum/members/3640729--sc-r-d-.html")
EndSwitch
WEnd
Jeder der mir hilft bekommt ein Thanks...
Passwort : mrmuni
|
|
|
|
08/02/2011, 11:24
|
#2
|
elite*gold: 52
Join Date: Oct 2010
Posts: 1,998
Received Thanks: 389
|
Machs einfach mit IniWrite/Iniread. Ich glaube da solltest du was in der HelpFile finden.
Alternative in der Registry mit RegRead/RegWrite.
|
|
|
|
|
08/02/2011, 11:36
|
#3
|
elite*gold: 0
Join Date: Jun 2011
Posts: 49
Received Thanks: 17
|
Quote:
Originally Posted by BlackHybrid
Machs einfach mit IniWrite/Iniread. Ich glaube da solltest du was in der HelpFile finden.
Alternative in der Registry mit RegRead/RegWrite.
|
Kannst du mein Script bearbeiten? ich habs nicht kapiert
|
|
|
|
|
08/02/2011, 11:54
|
#4
|
elite*gold: 0
Join Date: Aug 2010
Posts: 880
Received Thanks: 113
|
PHP Code:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("S4League Trainer", 335, 239, 195, 127, $WS_SYSMENU, $WS_EX_TOPMOST)
$Tab1 = GUICtrlCreateTab(0, 0, 329, 233)
$TabSheet1 = GUICtrlCreateTabItem("Trainer")
$Checkbox1 = GUICtrlCreateCheckbox("1Hit", 4, 25, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlSetState(-1, $GUI_DISABLE)
$Checkbox2 = GUICtrlCreateCheckbox("Fast Fire", 108, 25, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlSetState(-1, $GUI_DISABLE)
$Checkbox3 = GUICtrlCreateCheckbox("...", 212, 25, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlSetState(-1, $GUI_DISABLE)
$Checkbox4 = GUICtrlCreateCheckbox("Inf SP Skill", 4, 57, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox5 = GUICtrlCreateCheckbox("0 Accuracy", 108, 57, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox6 = GUICtrlCreateCheckbox("X-Ray", 212, 57, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox7 = GUICtrlCreateCheckbox("...", 4, 89, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox8 = GUICtrlCreateCheckbox("...", 108, 89, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox9 = GUICtrlCreateCheckbox("...", 212, 89, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Input1 = GUICtrlCreateInput("", 44, 113, 217, 22, BitOR($GUI_SS_DEFAULT_INPUT,$ES_CENTER,$ES_PASSWORD))
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button1 = GUICtrlCreateButton("Start", 4, 137, 121, 33)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button2 = GUICtrlCreateButton("Check Passwort", 172, 137, 121, 33)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button4 = GUICtrlCreateButton("Passwort speichern", 64, 178, 161, 33)
GUICtrlSetState(-1, $GUI_DISABLE)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$TabSheet2 = GUICtrlCreateTabItem("Credits")
$Label1 = GUICtrlCreateLabel("Coded by >:-{Scâréd}-:< and ...", 4, 17, 309, 36)
GUICtrlSetFont(-1, 18, 800, 6, "Curlz MT")
$Label2 = GUICtrlCreateLabel("GUI by >:-{Scâréd}-:<", 36, 57, 245, 33)
GUICtrlSetFont(-1, 16, 800, 2, "Kristen ITC")
$Label3 = GUICtrlCreateLabel(">:-{Scâréd}-:<", 76, 97, 166, 39)
GUICtrlSetFont(-1, 20, 800, 2, "Palatino Linotype")
$Label4 = GUICtrlCreateLabel("and", 132, 137, 49, 38)
GUICtrlSetFont(-1, 16, 800, 2, "Segoe Script")
$Label5 = GUICtrlCreateLabel("...", 140, 185, 22, 31)
GUICtrlSetFont(-1, 16, 800, 2, "Tempus Sans ITC")
$TabSheet3 = GUICtrlCreateTabItem("Homepages")
$Button3 = GUICtrlCreateButton("Hompage in Epvp >:-{Scâréd}-:<", 12, 25, 305, 89)
GUICtrlSetFont(-1, 16, 800, 2, "Matisse ITC")
GUICtrlCreateTabItem("")
GUISetState()
#EndRegion ### END Koda GUI section ###
Do
Sleep(10)
Until GUIGetMsg() == -3
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button4
if guictrlread($input1) = "mrmuni" Then
MsgBox(0, "Succes", "Passwort ist richtig!"&@crlf & _
"Es wurde gespeichert!")
FileWrite(@scriptdir&"\Passwort.txt", guictrlread($input1))
Else
MsgBox(0, "Failure", "Passwort ist falsch!")
EndIf
Case $Button2
If GUICtrlRead($Input1) = "mrmuni" Then
MsgBox(64,"","Das Passwort ist richtig")
GUICtrlSetState($Checkbox1, $GUI_ENABLE)
GUICtrlSetState($Checkbox2, $GUI_ENABLE)
GUICtrlSetState($Checkbox3, $GUI_ENABLE)
GUICtrlSetState($Button4, $GUI_ENABLE)
Else
MsgBox(64,"","Das Passwort ist falsch")
EndIf
Case $Button1
ToolTip("Starte S4League",0,0)
If ProcessWait("S4Client.exe") Then
ToolTip("S4League wurde gefunden... Der Trainer schließt sich",0,0)
Sleep(3000)
Exit
EndIf
Case $Button3
ShellExecute("http://www.elitepvpers.com/forum/members/3640729--sc-r-d-.html")
EndSwitch
WEnd
|
|
|
|
|
08/02/2011, 12:00
|
#5
|
elite*gold: 0
Join Date: Jun 2011
Posts: 49
Received Thanks: 17
|
Quote:
Originally Posted by Ludder231
PHP Code:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("S4League Trainer", 335, 239, 195, 127, $WS_SYSMENU, $WS_EX_TOPMOST)
$Tab1 = GUICtrlCreateTab(0, 0, 329, 233)
$TabSheet1 = GUICtrlCreateTabItem("Trainer")
$Checkbox1 = GUICtrlCreateCheckbox("1Hit", 4, 25, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlSetState(-1, $GUI_DISABLE)
$Checkbox2 = GUICtrlCreateCheckbox("Fast Fire", 108, 25, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlSetState(-1, $GUI_DISABLE)
$Checkbox3 = GUICtrlCreateCheckbox("...", 212, 25, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlSetState(-1, $GUI_DISABLE)
$Checkbox4 = GUICtrlCreateCheckbox("Inf SP Skill", 4, 57, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox5 = GUICtrlCreateCheckbox("0 Accuracy", 108, 57, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox6 = GUICtrlCreateCheckbox("X-Ray", 212, 57, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox7 = GUICtrlCreateCheckbox("...", 4, 89, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox8 = GUICtrlCreateCheckbox("...", 108, 89, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Checkbox9 = GUICtrlCreateCheckbox("...", 212, 89, 97, 17)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Input1 = GUICtrlCreateInput("", 44, 113, 217, 22, BitOR($GUI_SS_DEFAULT_INPUT,$ES_CENTER,$ES_PASSWORD))
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button1 = GUICtrlCreateButton("Start", 4, 137, 121, 33)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button2 = GUICtrlCreateButton("Check Passwort", 172, 137, 121, 33)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$Button4 = GUICtrlCreateButton("Passwort speichern", 64, 178, 161, 33)
GUICtrlSetState(-1, $GUI_DISABLE)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$TabSheet2 = GUICtrlCreateTabItem("Credits")
$Label1 = GUICtrlCreateLabel("Coded by >:-{Scâréd}-:< and ...", 4, 17, 309, 36)
GUICtrlSetFont(-1, 18, 800, 6, "Curlz MT")
$Label2 = GUICtrlCreateLabel("GUI by >:-{Scâréd}-:<", 36, 57, 245, 33)
GUICtrlSetFont(-1, 16, 800, 2, "Kristen ITC")
$Label3 = GUICtrlCreateLabel(">:-{Scâréd}-:<", 76, 97, 166, 39)
GUICtrlSetFont(-1, 20, 800, 2, "Palatino Linotype")
$Label4 = GUICtrlCreateLabel("and", 132, 137, 49, 38)
GUICtrlSetFont(-1, 16, 800, 2, "Segoe Script")
$Label5 = GUICtrlCreateLabel("...", 140, 185, 22, 31)
GUICtrlSetFont(-1, 16, 800, 2, "Tempus Sans ITC")
$TabSheet3 = GUICtrlCreateTabItem("Homepages")
$Button3 = GUICtrlCreateButton("Hompage in Epvp >:-{Scâréd}-:<", 12, 25, 305, 89)
GUICtrlSetFont(-1, 16, 800, 2, "Matisse ITC")
GUICtrlCreateTabItem("")
GUISetState()
#EndRegion ### END Koda GUI section ###
Do
Sleep(10)
Until GUIGetMsg() == -3
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button4
if guictrlread($input1) = "mrmuni" Then
MsgBox(0, "Succes", "Passwort ist richtig!"&@crlf & _
"Es wurde gespeichert!")
FileWrite(@scriptdir&"\Passwort.txt", guictrlread($input1))
Else
MsgBox(0, "Failure", "Passwort ist falsch!")
EndIf
Case $Button2
If GUICtrlRead($Input1) = "mrmuni" Then
MsgBox(64,"","Das Passwort ist richtig")
GUICtrlSetState($Checkbox1, $GUI_ENABLE)
GUICtrlSetState($Checkbox2, $GUI_ENABLE)
GUICtrlSetState($Checkbox3, $GUI_ENABLE)
GUICtrlSetState($Button4, $GUI_ENABLE)
Else
MsgBox(64,"","Das Passwort ist falsch")
EndIf
Case $Button1
ToolTip("Starte S4League",0,0)
If ProcessWait("S4Client.exe") Then
ToolTip("S4League wurde gefunden... Der Trainer schließt sich",0,0)
Sleep(3000)
Exit
EndIf
Case $Button3
ShellExecute("http://www.elitepvpers.com/forum/members/3640729--sc-r-d-.html")
EndSwitch
WEnd
|
Wenn ich das Passwort eingebe und Check Passwort klicke, passiert nix.
|
|
|
|
|
08/02/2011, 12:22
|
#6
|
elite*gold: 1826
Join Date: Mar 2009
Posts: 4,310
Received Thanks: 6,287
|
musst du deine frage so dumm stellen? ohne spoiler tuts auch.. jetzt hab ich keine lust mehr dir zu helfen. kkthxbye!
|
|
|
|
|
08/02/2011, 13:05
|
#7
|
elite*gold: 0
Join Date: Mar 2011
Posts: 8,645
Received Thanks: 3,454
|
|
|
|
|
|
08/02/2011, 14:02
|
#8
|
elite*gold: 1826
Join Date: Mar 2009
Posts: 4,310
Received Thanks: 6,287
|
OMG! der erste post in dem aussagekräftige threadtitel topic ist sogar von dem typen
|
|
|
|
|
08/02/2011, 14:47
|
#9
|
elite*gold: 0
Join Date: Aug 2010
Posts: 880
Received Thanks: 113
|
Quote:
Originally Posted by >:-{Scâréd}-:<
Wenn ich das Passwort eingebe und Check Passwort klicke, passiert nix.
|
Tja dein ganzes Script nützt nix musst es anders schreiben, aber der code is richtig....
P.S: Bei all deinen Button passiert nix...
|
|
|
|
|
08/02/2011, 21:50
|
#10
|
elite*gold: 0
Join Date: Jun 2011
Posts: 49
Received Thanks: 17
|
hab den Fehler gefunden
#closed
|
|
|
|
|
08/02/2011, 22:24
|
#11
|
elite*gold: 0
Join Date: Mar 2011
Posts: 8,645
Received Thanks: 3,454
|
Quote:
Originally Posted by >:-{Scâréd}-:<
hab den Fehler gefunden
#closed
|
Du kannst den thread nicht selber closen. Dafür musst du deinen beitrag melden und nach einen close bitten.
|
|
|
|
|
08/02/2011, 22:27
|
#12
|
elite*gold: 52
Join Date: Oct 2010
Posts: 1,998
Received Thanks: 389
|
Natürlich kann man einen Thread in den Themen Optionen selbst closen.
|
|
|
|
|
08/02/2011, 22:30
|
#13
|
elite*gold: 26
Join Date: Nov 2007
Posts: 32,809
Received Thanks: 12,143
|
Das könnt ihr nur im Black Market.
#closed
|
|
|
|
 |
Similar Threads
|
[Question] Kann man mit Tv auf Warrock zugreifen?
03/04/2011 - WarRock - 20 Replies
Hallo Warrock-com,
Kürzlich, wollte jemand checken ob ich hacke , und ich hatte das Teamvierver auf Fernsteuerung, er meinte er könnte nichts drücken, also im game.
Jetz meine frage, auf was muss ich teamvierver stellen das er klicken kann?
Oder war das alles nur show? :rolleyes:
Naja, ist kein großes Thema, ich entschuldige mich, wenn es ein Theard nicht wert ist.
Grüße,
Sam'
|
[Question] Kann mir jmd sagen wie....
10/11/2010 - Metin2 Private Server - 5 Replies
Hey ich hab da ein Problem kann mir vieleicht jemand sagen wie ich den Rotendrachen im Feuerland spawnen lasse?
:confused::confused::confused:
|
[Question]Kann mir jemand helfen?
05/26/2010 - Grand Chase - 17 Replies
Joah also wie da oben schon steht wollte ich fragen ob jemand mir helfen kann mich ins spiel einzugewöhnen. Ich hab schon ein paar Probleme beim Spiel und am besten wäre wenn jemand sehr aktiv in Grand Chase ist und auch oft on und skype hätte. Bitte pnt mich mit euren skypenamen wenn ihr mir helfen wollt. Am besten ihr seit schon ein hohes lvl nicht das derjenige auch nicht gerade viel über das Spiel weiß.
/hoffe das ich das in Deutsch fragen dürfte oO
|
[Question]Wie kann ich andre leute....
03/27/2010 - Metin2 Private Server - 11 Replies
Hay elitepvp
Also ich habe mir nen eigenen p server erstellt und will ihn offi machen,
jetzt is da nur das problem,wenn mein freund aufem server zocken will steht da nur du wirst mit dem server verbunden,ich habe die serverfiles von xxxAchixxx.
Bei meinen alten normalen server files hat es dann am ende mit andren portmaps geklappt bei den von xxxAchixxx jedoch leider nicht=(
Wer helfen kann bitte lösung schreiben oder link zu portmaps senden oder was weiß ich
|
All times are GMT +1. The time now is 10:34.
|
|
![[QUESTION]Wie kann ich...](https://www.elitepvpers.com/forum/iconimages/autoit/question-wie-kann-ich_ltr.gif){kind=small}
