1. Dashboard
  2. Mitglieder
    1. Letzte Aktivitäten
    2. Benutzer online
    3. Team
    4. Mitgliedersuche
  3. Forenregeln
  4. Forum
    1. Unerledigte Themen
  • Anmelden
  • Registrieren
  • Suche
Alles
  • Alles
  • Artikel
  • Seiten
  • Forum
  • Erweiterte Suche
  1. AutoIt.de - Das deutschsprachige Forum.
  2. Mitglieder
  3. Greek

Beiträge von Greek

  • Dauerhafte GUI-Abfrage

    • Greek
    • 2. August 2008 um 11:45

    also mit den includes funzt das doch? Ich lass die funktion laufen und drück auf X oder mach esc und das script beenden sich.

    Spoiler anzeigen

    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>

    GUICreate("Test", 358, 183, 193, 125)
    $ok = GUICtrlCreateButton("OK", 80, 56, 161, 81, 0)
    GUISetState(@SW_SHOW)

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

    Func _funktion() ;"Hauptfunktion"
    Beep(500, 50)
    Beep(500, 50) ;Während der Beeps soll die GUI abgefragt werden
    Beep(500, 50)
    Beep(500, 50)
    Beep(500, 50)
    Beep(500, 50)
    Beep(500, 50)
    Beep(500, 50)
    EndFunc

    E: ups lag daran das die beeps so schnell vorbei sind :/

  • Do...Until Problem

    • Greek
    • 31. Juli 2008 um 20:31

    Passiert bei dem script überhaupt was? bei mir steht da nur ne grüne 1 bei stop ne grüne 0

    Wo liegt das problem, hab noch net so geblickt was du willst.

  • MausMove in Schleife setzten + Abruch

    • Greek
    • 31. Juli 2008 um 15:02

    Mousemove($x, $y, 1)

    wär das nicht besser? da ist es viel schneller

  • MausMove in Schleife setzten + Abruch

    • Greek
    • 31. Juli 2008 um 14:54
    [autoit]

    HotKeySet ( "{F1}", "ext" )
    For $i = 0 To 700 Step +5
    MouseMove (100,100+$i,2)
    Next
    For $g = 0 to 900 Step +5
    MouseMove (100+$g,100,2)
    Next
    Exit

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

    Func ext()
    Exit
    EndFunc

    [/autoit]

    Ich hab auch was hingegrigt :D

  • WinWaitActive - ohne win aber Desktop??

    • Greek
    • 31. Juli 2008 um 13:51
    [autoit]

    $var = WinList()

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

    For $i = 1 to $var[0][0]
    ; Listet nur die sichtbaren Fenster auf, die einen Titel haben
    If $var[$i][0] <> "" AND IsVisible($var[$i][1]) Then
    MsgBox(0, "Details", "Titel=" & $var[$i][0] & @LF & "Handle=" & $var[$i][1])
    EndIf
    Next

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

    Func IsVisible($handle)
    If BitAnd( WinGetState($handle), 2 ) Then
    Return 1
    Else
    Return 0
    EndIf

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

    EndFunc

    [/autoit]

    must paar sachen ändern aber das ist doch was du willst?!

    Edit: Oh es gibt ja schon Seite 2 xD dann brauchste ja es eh net mehr.

  • Anfänger braucht Hilfe

    • Greek
    • 31. Juli 2008 um 11:27

    na du sollst omega nicht mit mouseclicks starten sonder mit dem Run befehl , mach rechtklick auf die omega exe und und nimm den pfad für den Run befehl. Sieht dann so ungefair aus Run ( "c:\programme\omega\omega.exe")

  • WinWaitActive - ohne win aber Desktop??

    • Greek
    • 31. Juli 2008 um 11:03

    Wie willste du den ohne Schleife den was machen? Autoit führt das script einmal aus und beendet sich dann wieder, dann kann er das Spiel ja gleich wieder starten

  • WinWaitActive - ohne win aber Desktop??

    • Greek
    • 31. Juli 2008 um 10:56

    While 1
    Sleep ( 200 )

    If WinExists ( "MineSweeper") Then
    WinClose ( "MineSweeper")

    EndIf
    WEnd

    so machst du es einfach mit allem

  • Bild erscheint nicht...

    • Greek
    • 30. Juli 2008 um 17:29

    oh man ne 0 :rolleyes:

    Danke Poldy :thumbup:

  • Do...Until Problem

    • Greek
    • 30. Juli 2008 um 17:01

    Ich habe es jetzt stundenlang probiert mit allem - das will einfach net O.o

    mach lieber eine funktion :/

  • Bild erscheint nicht...

    • Greek
    • 30. Juli 2008 um 15:00

    hm das müsste man mal in die hilfe reinschreiben...

    danke

    Edit : komisch aber so erscheint auch nichts

    Spoiler anzeigen

    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>

    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Form1", 366, 247, 349, 227)
    $Button1 = GUICtrlCreateButton ("", 88, 56, 185, 129, 0,$BS_BITMAP )
    GUICtrlSetImage ( $Button1 , "C:\Dokumente und Einstellungen\Ackermann\Desktop\hilfe.bmp" )
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    EndSwitch
    WEnd

  • Bild erscheint nicht...

    • Greek
    • 30. Juli 2008 um 12:39
    Spoiler anzeigen

    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>

    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Form1", 366, 247, 349, 227)
    $Button1 = GUICtrlCreateButton ("", 88, 56, 185, 129, 0,$BS_BITMAP )
    GUICtrlSetImage ( $Button1 , "@Systemdir & \oobe\images\merlin.gif" )
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    EndSwitch
    WEnd

    Warum geht das net?

  • Klick auf Grafik -> neues Fenster

    • Greek
    • 30. Juli 2008 um 11:22

    Du hast geschrieben :
    Ich habe versucht, bei klick auf einen Button einfach mit GuiCreate ein neues Fenster zu öffnen. Da passierte allerdings nichts.

    Zeig mal deinen Code.

  • Do...Until Problem

    • Greek
    • 29. Juli 2008 um 21:13

    Ich glaub das geht net weil sich das fenster ständig wieder mit winaktiv aktiviert und dann kann man den button nicht gut drücken

    [autoit]

    HotKeySet ( "{F1}", "ext" )

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

    #include <GUIConstants.au3>

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

    #Region ### START Koda GUI section ### Form=C:\Dokumente und Einstellungen\Scooby\Desktop\test.kxf
    $Form1 = GUICreate("Form1", 284, 90, 193, 187)
    $Button1 = GUICtrlCreateButton("Start", -8, 48, 129, 41, 0)
    $Button2 = GUICtrlCreateButton("Stop", 152, 48, 129, 41, 0)
    $Label1 = GUICtrlCreateLabel("Autoklicker", 88, 8, 96, 28)
    GUICtrlSetFont(-1, 14, 400, 0, "MS Sans Serif")
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    While 1
    $msg = GUIGetMsg()
    Select
    Case $msg = $Button1
    Run("notepad.exe")
    Do
    $msg = GUIGetMsg()
    WinWaitActive ( "Unbenannt - Editor" )
    WinActivate ( "Unbenannt - Editor" )
    Send("Das ist ein Beispieltext.")
    until $msg = $Button2
    ;Case $Button2
    ; WinActivate("Unbenannt - Editor")
    ;WinClose("Unbenannt - Editor")
    ;WinWaitActive("Editor", "Der Text in der Datei Unbenannt wurde verändert")
    ;Send("!n")
    case $msg = $GUI_EVENT_CLOSE
    MsgBox(0, "GUI Event", "Du hast auf CLOSE geklickt! Programm wird beendet...")
    ExitLoop
    EndSelect
    WEnd

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

    Func ext()
    Exit
    EndFunc

    [/autoit]

    wenn du richtig auf dem Stop button rumhämmerst beendet es auch irgendwann :)

    Drück f1 um das script zu beenden

    Du solltest ne funktion für das stoppen schreiben nen button ist da nicht angebracht ich kann dir mal eine editieren mom


    Edit: sooooo Einfach F2 drücken dann wird das ausgefürt was dein Button2 eigentlich machen sollte hab nur noch ein exit dran gehängt nachdem er den editor beendet hat.

    [autoit]

    HotKeySet ( "{F1}", "ext" )
    HotKeySet ( "{F2}", "button2" )

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

    #include <GUIConstants.au3>
    #include <Misc.au3>

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

    #Region ### START Koda GUI section ### Form=C:\Dokumente und Einstellungen\Scooby\Desktop\test.kxf
    $Form1 = GUICreate("Form1", 284, 90, 193, 187)
    $Button1 = GUICtrlCreateButton("Start", -8, 48, 129, 41, 0)
    ;$Button2 = GUICtrlCreateButton("Stop", 152, 48, 129, 41, 0)
    $Label1 = GUICtrlCreateLabel("Autoklicker", 88, 8, 96, 28)
    GUICtrlSetFont(-1, 14, 400, 0, "MS Sans Serif")
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    $dll = DllOpen("user32.dll")

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

    While 1
    $msg = GUIGetMsg()
    Select
    Case $msg = $Button1
    Run("notepad.exe")
    Do
    $msg = GUIGetMsg()
    WinWaitActive ( "Unbenannt - Editor" )
    WinActivate ( "Unbenannt - Editor" )
    Send("Das ist ein Beispieltext.")
    until _IsPressed (71, $dll )
    ;Case $Button2
    ; WinActivate("Unbenannt - Editor")
    ;WinClose("Unbenannt - Editor")
    ;WinWaitActive("Editor", "Der Text in der Datei Unbenannt wurde verändert")
    ;Send("!n")
    case $msg = $GUI_EVENT_CLOSE
    MsgBox(0, "GUI Event", "Du hast auf CLOSE geklickt! Programm wird beendet...")
    ExitLoop
    EndSelect
    WEnd
    DllClose($dll)

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

    Func ext()
    Exit
    EndFunc

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

    Func button2()
    Sleep ( 200 )
    WinActivate("Unbenannt - Editor")
    WinClose("Unbenannt - Editor")
    WinWaitActive("Editor", "Der Text in der Datei Unbenannt wurde verändert")
    Send("!n")
    Exit

    EndFunc

    [/autoit]
  • Problem beim Absenden meiner Übersetzung

    • Greek
    • 28. Juli 2008 um 11:05
    Zitat von Tweaky

    geht es immer noch nicht Greek?
    Wenn nicht mal Cookies usw. löschen

    es geht jetzt aber jetzt hat mein freund genau das problem xD ich überhaupt nix verändert es war einfach so weg.

  • Datei wird ausgeführt brauch aber andere dateien damit es funktioniert.

    • Greek
    • 28. Juli 2008 um 10:00
    Zitat von S-e-v-e-n

    Die deutsche Hilfe ist ja auch noch nicht fertig übersetzt. Du kannst ja bei der Übersetzung mithelfen.

    Jo das mach ich auch jetzt mal :D

    Gerade als Shadowmaster6 1 übersetzung und 2 reviews :]

  • Datei wird ausgeführt brauch aber andere dateien damit es funktioniert.

    • Greek
    • 27. Juli 2008 um 20:01
    Zitat von S-e-v-e-n

    Start -> AutoIt v3 -> AutoIt Help File

    danke , ich hab mir ne deutsche runter geladen da ist alles übersetzt aber anscheinend fehlen da noch viele befehle :S

  • Datei wird ausgeführt brauch aber andere dateien damit es funktioniert.

    • Greek
    • 27. Juli 2008 um 19:55
    Zitat von S-e-v-e-n

    In der Hilfe-Datei.

    Probier mal das aus.

    [autoit]


    ShellExecute(@ScriptDir & "\EPLite_v100_Final_D2v112\EasyLoad.exe", "", @ScriptDir & "\EPLite_v100_Final_D2v112")

    [/autoit]

    thx jetzt gehts auch wenn ichs net verstanden hab XD wo gibts die hilfe datei , ich hab auch eine runtergeladen aber da stehen anscheinend net alle befehle drin

  • Datei wird ausgeführt brauch aber andere dateien damit es funktioniert.

    • Greek
    • 27. Juli 2008 um 19:44
    Zitat von S-e-v-e-n

    Schau dir mal ShellExecute an, dort kannst du auch das Arbeitsverzeichnis "workingdir" festlegen

    wo soll ich mir den angucken?

  • Datei wird ausgeführt brauch aber andere dateien damit es funktioniert.

    • Greek
    • 27. Juli 2008 um 19:37

    [Blockierte Grafik: http://img511.imageshack.us/img511/4425/progib2.jpg]

    so geht es aber wenn ich das script auf den destop tu gehts net mehr . So jetzt ist es verständlich für alle.

Spenden

Jeder Euro hilft uns, Euch zu helfen.

Download

AutoIt Tutorial
AutoIt Buch
Onlinehilfe
AutoIt Entwickler
  1. Datenschutzerklärung
  2. Impressum
  3. Shoutbox-Archiv
Community-Software: WoltLab Suite™