textmarkieren/löschen.

11/03/2009 22:43 muse-#1
hey leute.
ich habe mich zu übungszwecken an realmlistchanger gesetzt aber hänge nun an dem punkt fest,dass er zwar in die Datei etwas hineinschreibt,aber nicht die alte Realmlist löscht.

hier der Code

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\pwn_age55\eigene dateien\rl changer.kxf
$Form1_1 = GUICreate("rl changer", 376, 275, 483, 186)
$Input1 = GUICtrlCreateInput("", 208, 104, 145, 21)
$Button1 = GUICtrlCreateButton("go", 136, 216, 81, 33, 0)
$Button2 = GUICtrlCreateButton("end.", 280, 240, 65, 25, 0)
$Label1 = GUICtrlCreateLabel("by drakii", 32, 240, 55, 17)
$Button3 = GUICtrlCreateButton("Load", 288, 144, 65, 25, 0)
$Button4 = GUICtrlCreateButton("Save", 208, 144, 65, 25, 0)
$Input2 = GUICtrlCreateInput("", 32, 104, 121, 21)
$Input3 = GUICtrlCreateInput("", 32, 144, 121, 21)
$Group1 = GUICtrlCreateGroup("acc/pw", 16, 80, 153, 97)
$Label2 = GUICtrlCreateLabel("acc", 80, 88, 22, 17)
$Label3 = GUICtrlCreateLabel("pw", 80, 128, 18, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("realmlist enter", 184, 80, 185, 97)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Checkbox1 = GUICtrlCreateCheckbox("start wow+login", 128, 184, 97, 17)
$Input4 = GUICtrlCreateInput("", 64, 32, 177, 21)
$Button5 = GUICtrlCreateButton("durchsuchen", 248, 32, 73, 25, 0)
$Group3 = GUICtrlCreateGroup("alte realmlist", 32, 16, 313, 49)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
go ()
Case $Button2
Exit
Case $Button3
load ()
Case $Button4
save ()
Case $Button5
durchsuchen ()
EndSwitch
WEnd

func load ()
$1=IniRead("save-file.ini","Settings","Pfad","")
GUICtrlSetData($Input1,$1)
EndFunc

func save ()
IniWrite("save-file.ini","Settings","Pfad",GUICtrlRead($Input1))
EndFunc

func go ()
$file = FileOpen(GUICtrlRead($Input4) ,1)
FileWrite($file, "set realmlist " & GUICtrlRead($Input2))
FileClose($file)
sleep (1000)
EndFunc

func durchsuchen ()
$rl= FileOpenDialog("Realmlist",@ScriptDir,"Realmlist(* .wtf)")
GUICtrlSetData($Input4,$rl)
EndFunc
es ist noch lange nicht fertig aber da ich schon hängen geblieben bin wollt ich erstmal den fehler beheben

danke leute!

pwn
11/03/2009 22:58 ^darkwing#2
habe zwar kein plan von autoIT aber liegt sehr wahrscheinlich daran wie du die datei öffnest.
Deswegen guck dir funktion genauer an. Man kann bestimmt angeben, ob an das Ende der Datei geschrieben werden soll oder ganz überschrieben werden soll usw.
11/03/2009 23:04 muse-#3
ja habe ich schon gemacht^^
ich könnte es einfach via run öffnen,nur das problem ist,das ich dann mit MouseMoveTo rangehen würde und ich wollte es mal ohne probieren^^
aber danke ^-^

/EDIT: habe den fehler gefunden

Quote:
$file = FileOpen(GUICtrlRead($Input4) ,2)
anstatt

Quote:
$file = FileOpen(GUICtrlRead($Input4) ,1)
schließen bitte^^
11/04/2009 15:03 Adroxxx#4
#solved
#closed