Beiträge von spaki

spaki

schau gerad in dem autoit buch rein, bin mir noch nicht sicher was für eine sprache ich lerne.. hab schon bei java und c++ reingeschaut. Hatte mich vor jahren schonmal mit autoit befasst und darum wollt ich damit nur "schnell" das kleine tool fertig machen und dann inruhe mich für eine sprache entscheiden. Ist iwo bei dem code ein fehler da er die ini nicht ausspuckt ?

spaki

Mit einer ini datei hab ich es auch hinbekommen gehabt aber ich wollte es gerne in einer textdatei^^ aber ok danke :). Achja, wenn ich die sache mit den Tabs weglasse dann schreibt er es auch in eine textdatei^^

spaki

ja das

[autoit]

GUICtrlRead(controlID, advanced = 0)

[/autoit]

nur es richtig zu benutzen so das alles dort ist wo es hin soll habe ich nicht hinbekommen
es sollte dann noch in eine Textdatei geschrieben werden in der anordnung:
Charname:testchar
Accountname:test
Server:4

[spoiler]

[autoit]

#include <GUIConstants.au3>
#include <Timers.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <WindowsConstants.au3>

[/autoit][autoit][/autoit][autoit]

Opt("GUIOnEventMode", 1)

[/autoit][autoit][/autoit][autoit]

$Form1_1 = GUICreate("Verwaltung", 800, 600, 212, 125)

[/autoit][autoit][/autoit][autoit]

$Time = GUICtrlCreateLabel("", 650, 4, 80, 20)
GUICtrlSetColor(-1, 0x008000)
GUICtrlSetFont(-1, 10, 800, 0, "Arial Narrow")

[/autoit][autoit][/autoit][autoit]

;----------------------------------------------------------------------------------------------/
; Tab
;----------------------------------------------------------------------------------------------/
GUICtrlCreateTab(3, 3, 797, 595)

[/autoit][autoit][/autoit][autoit]

;----------------------------------------------------------------------------------------------/
; TabItem 1
;----------------------------------------------------------------------------------------------/
GUICtrlCreateTabItem("Angaben")
GUICtrlSetState(-1, $GUI_SHOW)

$Label1 = GUICtrlCreateLabel("Charname:", 40, 40, 84, 17)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")

$Char = GUICtrlCreateInput("", 150, 40, 153, 21)

$Label2 = GUICtrlCreateLabel("Accountname:", 399, 40, 101, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")

$ACC = GUICtrlCreateInput("", 500, 40, 129, 21)

$Label3 = GUICtrlCreateLabel("Server:", 40, 72, 110, 17)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")

$Server = GUICtrlCreateCombo("", 150, 72, 105, 25)
GUICtrlSetData(-1, "1|2|3|4|")

[/autoit][autoit][/autoit][autoit]

$erstellen = GUICtrlCreateButton("Eintragen", 40, 500, 97, 33, 0)

[/autoit][autoit][/autoit][autoit]

;----------------------------------------------------------------------------------------------/
; Tab 2
;----------------------------------------------------------------------------------------------/
GUICtrlCreateTabItem("Account")

GUISetState(@SW_SHOW)

[/autoit][autoit][/autoit][autoit]

;----------------------------------------------------------------------------------------------/
; set on event
;----------------------------------------------------------------------------------------------/
GUISetOnEvent(-3, "_exit")

[/autoit][autoit][/autoit][autoit]

;----------------------------------------------------------------------------------------------/
; Timer
;----------------------------------------------------------------------------------------------/
$Timer1 = _Timer_SetTimer($Form1_1, 1000, "_UpdateStatusBarClock")

[/autoit][autoit][/autoit][autoit]

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $erstellen
$ACC=GUICtrlRead($Char)
FileWrite($ACC & ".txt", $ACC)
EndSwitch
WEnd

[/autoit][autoit][/autoit][autoit]

Func _UpdateStatusBarClock($hWnd, $Msg, $iIDTimer, $dwTime)
#forceref $hWnd, $Msg, $iIDTimer, $dwTime
GUICtrlSetData($Time, StringFormat("%02d:%02d:%02d", @HOUR, @MIN, @SEC))
EndFunc

[/autoit][autoit][/autoit][autoit]

Func _exit()
Exit
EndFunc ;==>_exit

[/autoit]

[/spoilich werde mich demnächst mal der hilfe annehmen

spaki

So hallo alle miteinander, ich bin seit paar tagen damit beschäftigt mir ein kleines Programm zu schreiben um paar sachen zu speichern ich komme aber absolut nicht weiter hier mal der quellcode

Spoiler anzeigen

[autoit][/autoit]

#include <GUIConstants.au3>
#include <Timers.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=c:\users\marko\desktop\gameforge\form1.kxf

Opt("GUIOnEventMode", 1)

$Form1_1 = GUICreate("Verwaltung", 800, 600, 212, 125)
$Time = GUICtrlCreateLabel("", 650, 4, 80, 20)
GUICtrlSetColor(-1, 0x008000)
GUISetState(@SW_SHOW)
GUICtrlSetFont(-1, 10, 800, 0, "Arial Narrow")
$Timer1= _Timer_SetTimer($Form1_1, 1000, "_UpdateStatusBarClock")
Func _UpdateStatusBarClock($hWnd, $Msg, $iIDTimer, $dwTime)
#forceref $hWnd, $Msg, $iIDTimer, $dwTime
GUICtrlSetData($Time, StringFormat("%02d:%02d:%02d", @HOUR, @MIN, @SEC))
EndFunc
Func _exit()
Exit
EndFunc ;==>_exit

GUISetOnEvent(-3, "_exit")

GUICtrlCreateTab(3, 3, 797, 595)

GUICtrlCreateTabItem("Angaben")
$Label1 = GUICtrlCreateLabel("Charname:", 40, 40, 84, 17)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$Char = GUICtrlCreateInput("", 150, 40, 153, 21)
$Label2 = GUICtrlCreateLabel("Accountname:", 399, 40, 101, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$ACC = GUICtrlCreateInput("", 500, 40, 129, 21)
$Label3 = GUICtrlCreateLabel("Server:", 40, 72, 110, 17)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$Server = GUICtrlCreateCombo("", 150, 72, 105, 25)
GUICtrlSetData(-1, "1|2|3|4|")
$erstellen = GUICtrlCreateButton("Eintragen", 40, 500, 97, 33, 0)
GUICtrlCreateTabItem("Account")
GUISetState(@SW_SHOW)

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

Erstmal muss ich immer auf den 2ten Tab klicken und dann wieder zum ersten bevor dieser etwas anzeigt, dann hätte ich es gerne das wenn ich bei charname und acc ,server usw was eintrage und dann auf eintragen klicke das er mir eine txt datei mit den eingegebenen werten anlegt und als name dann zb der acc name.später füge ich noch mehr hinzu aber is jetzt nur damit ich verstehe wie das ganze funktioniert...

spaki

mag denn keiner helfen?

spaki

so also ich denke ich bin zu blöd dazu habe ma nen bild gemacht

Spoiler anzeigen

[Blockierte Grafik: http://img228.imageshack.us/img228/3725/unbenannt2ce.jpg]

also bei dem gui auf start klicken dann geht der emulator auf dann sollte er eigendlich das spiel starten,das tut er aber nich das script sieht nun so aus

Spoiler anzeigen

[autoit]

#include <GUIConstants.au3>

[/autoit] [autoit][/autoit] [autoit]

#region ### START Koda GUI section ### Form=c:\users\m\desktop\form2.kxf
$Form2 = GUICreate("Form1", 383, 258, 497, 219)
$Button1 = GUICtrlCreateButton("Starten", 304, 16, 57, 25, 0)
$Button2 = GUICtrlCreateButton("Ende", 304, 56, 57, 25, 0)
$Pic1 = GUICtrlCreatePic("C:\Users\m\Desktop\FF9 kuja dragon.jpg", 0, 0, 281, 257, 0)
$Pic2 = GUICtrlCreatePic("C:\Users\m\Desktop\ff9-zidane.jpg", 288, 136, 92, 121, 0)

[/autoit] [autoit][/autoit] [autoit]

GUISetState(@SW_SHOW)
#endregion ### END Koda GUI section ###

[/autoit] [autoit][/autoit] [autoit]

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
case $Button1
$Programm = "C:\Spiele\versuch ff9\emu 1.7\ePSXe.exe"
$Short = FileCreateShortcut($Programm ,@DesktopDir & "\Emulator.lnk","","-loadbin FF9CD3.img", "epsxe", "", "", "", @SW_MAXIMIZE)
ShellExecute(@DesktopDir & "\Emulator.lnk")
case $Button2
Exit
EndSwitch

WEnd

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit]

ich will einfach nur das er das spiel startet aber ich bekomms nicht hin

edit kann denn keiner helfen?

spaki

also der emulator startet ja aber er ladet leider das das datenträgerabbild nicht nicht

spaki

habs nun so gemacht

[autoit]

case $Button1
Run("C:\Spiele\versuch ff9\emu 1.7\ePSXe.exe -loadbin C:\Spiele\FF9\FF9CD3.img")

[/autoit]

geht aber nicht ,ich probiere ma bissl rum

spaki

so also ich check das nich richtig hier ma der quell text

[autoit]

#include <GUIConstants.au3>

[/autoit][autoit][/autoit][autoit]

#region ### START Koda GUI section ### Form=c:\users\m\desktop\form2.kxf
$Form2 = GUICreate("Form1", 383, 258, 497, 219)
$Button1 = GUICtrlCreateButton("Starten", 304, 16, 57, 25, 0)
$Button2 = GUICtrlCreateButton("Ende", 304, 56, 57, 25, 0)
$Pic1 = GUICtrlCreatePic("C:\Users\m\Desktop\FF9 kuja dragon.jpg", 0, 0, 281, 257, 0)
$Pic2 = GUICtrlCreatePic("C:\Users\m\Desktop\ff9-zidane.jpg", 288, 136, 92, 121, 0)

[/autoit][autoit][/autoit][autoit]

GUISetState(@SW_SHOW)
#endregion ### END Koda GUI section ###

[/autoit][autoit][/autoit][autoit]

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
case $Button1
Run ("C:\Spiele\versuch ff9\emu 1.7\ePSXe.exe")
Sleep (1500)
-loadbin FF9CD3.ccd
case $Button2
Exit
EndSwitch
WEnd

[/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit]

es ist nix weltbewegendes es ist nur zur übung gedachr um mich rein zu finden da ich vorher immer nur mit mousemove pixelgetcolor gearbeitet hatte

spaki

wow ihr seit super ich bin jetzt erstma kurz weg und wen ich gleich bald wieder da bin werde ich eure sachen genauer anschauen und durchlesen und aus probieren. ich hatte mir das jetzt so hin getüftelt vllt is ja schon ein bissl was richtig.

[autoit]

WinActivate("[EPSXGUI:ePSXe - Enhanced PSX emulator]")
WinMenuSelectItem ("[EPSXGUI:ePSXe - Enhanced PSX emulator]", "","File", "Run ISO", "Open PSX ISO" )

[/autoit]

spaki

so also folgendes: ihr kennt doch alle emulatoren, man muss ja wenn man ein spiel starten will eine iso datei oder ein datenträgerabbild auswählen ich möchte nun das mein script das macht und ich möchte nicht mit mousemove arbeiten.wie bekomme ich hin das mein script die datei auswählt die ich will. [Blockierte Grafik: http://img594.imageshack.us/img594/488/unbenanntqu.jpg]
da hin und dann im nächsten fenster soll er das auswählen und starten.hoffe ihr wisst was ich meine.

spaki

ich bedanke mich bei allen die gepostet haben und geholfen haben ich hatte mich zwar vor einer weile mit autoit beschäftigt gehabt. da aber nur mit mousemove und mouseklick und sowas versuche mich erst jetzt mit gui und buttons.

spaki

ja genau danke schön autobert das ist genau das was ich meinte .wenn ich noch weitere fragen habe zu dem script kann ich ddie dann hier posten oder soll ich dann immer ein neues thema eröffnen?

spaki

so ja hallo an alle,
habe mich heute daran versucht nen script zur übung zu erstellen, ich hänge nun daran fest das ich
nicht weiss wie ich den buttons eine funktion zuweise und stehe total auf dem schlauch.vllt kann mir einer einen tipp geben.

Spoiler anzeigen

#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=das is der pfad zu den bildern(gehts vllt auch ohne pfad)?
$Form2 = GUICreate("Form1", 383, 258, 497, 219)
$Button1 = GUICtrlCreateButton("Starten", 304, 16, 57, 25, 0)
$Button2 = GUICtrlCreateButton("Ende", 304, 56, 57, 25, 0)
$Pic1 = GUICtrlCreatePic("C:\Users\m\Desktop\hier is nen bild", 0, 0, 281, 257, 0)
$Pic2 = GUICtrlCreatePic("C:\Users\m\Desktop\und noch eins", 288, 136, 92, 121, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

EndSwitch
WEnd
Func ()
While 1

If $msgbox = 6 Then MsgBox(0, "", "Start")
If $msgbox = 7 Then MsgBox(0, "", "Ende")
WEnd
EndFunc

spaki

wäre es möglich mit autoit den computer oder laptop zu einer bestimmten zeit starten zulassen und dann ein paar sachen zu machen und nach paar std wieder runter zufahren?

spaki

ja genau danke schön das is so wie ich es haben wollte thx

spaki

#include <GUIConstants.au3>
Opt("GUIOnEventMode",4)
Global $buttons=2

#Region ### START Koda GUI section ### Form=C:\Programme\AutoIt3\Neuer Ordner\Forms\Form1.kxf

$Form1 = GUICreate("Form1", 633, 447, 193, 125)

$Button_1 = GUICtrlCreateButton("spaki", 40, 56, 65, 33, 0)
GUISetState(@SW_SHOW)

#EndRegion ### END Koda GUI section ###

GUISetOnEvent($GUI_EVENT_CLOSE,"_CLOSE")
GUICtrlSetOnEvent($Button_1,"_add")
While 1

Sleep(100)
WEnd
Func _CLOSE()
Exit
EndFunc
Func _add()
$buttons=$buttons+0
GUICtrlCreateButton("button1 " & $buttons,40,40+$buttons*40,65,33)
GUICtrlSetOnEvent(-1,"_CLICK1")
GUICtrlCreateButton("button2 " & $buttons,40,80+$buttons*40,65,33)
GUICtrlSetOnEvent(-1,"_CLICK2")
GUICtrlCreateButton("button3 " & $buttons,40,120+$buttons*40,65,33)
GUICtrlSetOnEvent(-1,"_CLICK3")
GUICtrlCreateButton("button4 " & $buttons,40,160+$buttons*40,65,33)
GUICtrlSetOnEvent(-1,"_CLICK4")

EndFunc
Func _CLICK1()
GUICtrlCreateButton(" 1 " & $buttons,120,40+$buttons*40,65,33)
GUICtrlSetOnEvent(-1,"_CLICK1")
GUICtrlCreateButton(" 2 " & $buttons,120,80+$buttons*40,65,33)
GUICtrlSetOnEvent(-1,"_CLICK2")
GUICtrlCreateButton(" 3 " & $buttons,120,120+$buttons*40,65,33)
GUICtrlSetOnEvent(-1,"_CLICK3")
GUICtrlCreateButton(" 4 " & $buttons,120,160+$buttons*40,65,33)
EndFunc

Func _CLICK2()
Run ("notepad")
EndFunc

Func _CLICK3()
Run ("notepad")
EndFunc

Func _CLICK4()
Run ("notepad")
EndFunc

und noch ne frage wenn ich das gui öffner stehen ganz am ende hinter jedem button die gleichen zahlen ne 2 glaub ich wie gehen diese weg

spaki

also wie oben geschrieben will ich damit was machen mit GUICtrlSetOnEvent.Wenn ich aber einmal auf einen button 1 raufklicke, kommt button 1.1 , 1.2 , 1.3 eine art auswahl menü, soweit sogut.nun will ich aber wenn ich wieder auf button 1 klicke das die buttons 1.1 , 1.2 , 1.3 wieder weg gehen hab aber kei plan wie oder einfach das gui refreschen oder so,weiss jemand rat?

spaki

ja ok hab das jetzt mit OnEventModegemacht aber wenn ich da etwas anklicke kommen die buttons(ja soll so sein) aber wenn man sich mal verklickt hat und die buttons wieder weg haben will geht das net die bleiben da und das sollen se nicht und es steht hinter fast jeden button ein 2 da soll aber nix stehen naja seht es euch an

#include <GUIConstants.au3>
Opt("GUIOnEventMode",4)
Global $buttons=2

#Region ### START Koda GUI section ### Form=C:\Programme\AutoIt3\Neuer Ordner\Forms\Form1.kxf

$Form1 = GUICreate("Form1", 633, 447, 193, 125)

$Button_1 = GUICtrlCreateButton("hallo", 40, 56, 65, 33, 0)
GUISetState(@SW_SHOW)

#EndRegion ### END Koda GUI section ###

GUISetOnEvent($GUI_EVENT_CLOSE,"_CLOSE")
GUICtrlSetOnEvent($Button_1,"_add")
While 1

Sleep(100)
WEnd
Func _CLOSE()
Exit
EndFunc
Func _add()
$buttons=$buttons+0
GUICtrlCreateButton("Pimper " & $buttons,40,40+$buttons*40,65,33)
GUICtrlSetOnEvent(-1,"_CLICK1")
GUICtrlCreateButton("button2 " & $buttons,40,80+$buttons*40,65,33)
GUICtrlSetOnEvent(-1,"_CLICK2")
GUICtrlCreateButton("button3 " & $buttons,40,120+$buttons*40,65,33)
GUICtrlSetOnEvent(-1,"_CLICK3")
GUICtrlCreateButton("button4 " & $buttons,40,160+$buttons*40,65,33)
GUICtrlSetOnEvent(-1,"_CLICK4")

EndFunc
Func _CLICK1()
GUICtrlCreateButton("Ch 1 " & $buttons,120,40+$buttons*40,65,33)
GUICtrlSetOnEvent(-1,"_CLICK1")
GUICtrlCreateButton("Ch 2 " & $buttons,120,80+$buttons*40,65,33)
GUICtrlSetOnEvent(-1,"_CLICK2")
GUICtrlCreateButton("Ch 3 " & $buttons,120,120+$buttons*40,65,33)
GUICtrlSetOnEvent(-1,"_CLICK3")
GUICtrlCreateButton("Ch 4 " & $buttons,120,160+$buttons*40,65,33)
EndFunc

Func _CLICK2()

EndFunc

Func _CLICK3()

EndFunc

Func _CLICK4()

EndFunc

spaki

also habe ne gui jetzt mit 3 buttons,wenn ich auf einen button raufklicke sollen nochmal 3 buttons kommen und das selbe nochmal wäre dankbar für nen bissl hilfe oder halt etwas wo man nur was eintippen muss (z.b. zahlen und der dann was ausführt)

#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=C:\Programme\AutoIt3\Neuer Ordner\Forms\Form1.kxf

$Form1 = GUICreate("Form1", 633, 447, 193, 125)

$Button1 = GUICtrlCreateButton("Button1", 40, 56, 65, 33, 0)

$Button2 = GUICtrlCreateButton("Button2", 40, 96, 65, 33, 0)

$Button3 = GUICtrlCreateButton("Button3", 40, 136, 65, 33, 0)

GUISetState(@SW_SHOW)

#EndRegion ### END Koda GUI section ###

While 1

$nMsg = GUIGetMsg()

Switch $nMsg

Case $GUI_EVENT_CLOSE

Exit

Case $Button1

msgbox ( 0 , "Box" , "Ich bin Button1" )

Case $Button2

msgbox ( 0 , "Box" , "Ich bin Button2" )

Case $Button3

msgbox ( 0 , "Box" , "Ich bin Button3" )

EndSwitch

WEnd

Beiträge von spaki

Etwas eintragen und als txt datei speichern

Etwas eintragen und als txt datei speichern

Etwas eintragen und als txt datei speichern

Etwas eintragen und als txt datei speichern

keine ahnung wie ich dazu sagen soll

keine ahnung wie ich dazu sagen soll

keine ahnung wie ich dazu sagen soll

keine ahnung wie ich dazu sagen soll

keine ahnung wie ich dazu sagen soll

keine ahnung wie ich dazu sagen soll

keine ahnung wie ich dazu sagen soll

button zuweisen

button zuweisen

button zuweisen

pc starten

GUICtrlSetOnEvent

GUICtrlSetOnEvent

GUICtrlSetOnEvent

bekomms net hin

bekomms net hin