Beiträge von Xenon

  • Copy & Paste mit Autoit mehrmals ausführen

    Also bei mir gehts. :D
    Ich habe einfach das Programm gestartet, den Dialog "Ausführen" (Win+r) gestartet und "q" gedrückt.

    Es wurde sofort der Text eingefügt... Komisch.
    Vllt. hast du nicht in den Texteditor geklickt? Ich versteh das sonst nicht. ?(

    Ach so: vielleicht solltest du auch was zum Beenden hinzufügen?

    Spoiler anzeigen
    [autoit]

    #include <GUIConstants.au3>
    #include <WindowsConstants.au3>
    #include <misc.au3>

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

    HotKeySet("{q}", "Schreiben2")
    HotKeySet("{w}", "Schreiben")
    HotKeySet("{Esc}", "_Exit")

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

    Func Schreiben()
    $c = "text"
    ClipPut($c)
    Sleep(100)
    Send("^v")
    EndFunc

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

    Func Schreiben2()
    $v = "text2"
    ClipPut($v)
    Sleep(100)
    Send("^v")
    EndFunc

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

    Func _Exit ()
    Exit
    EndFunc

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

    While 1
    Sleep(100)
    Wend

    [/autoit]

    MfG Xenon

  • Mit Zählerschleife verschiedene Namen schreiben

    Wenn du die Namen einfach untereinander in eine Textdatei schreibst, als so:

    &quot;Test.txt&quot;

    Max
    Peter
    John
    Karl
    Dieter


    Dann kannst du das so machen:

    Spoiler anzeigen
    [autoit]

    Local $a = 1
    Local $Name = ""

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

    $File = FileOpen ("Test.txt", 0) ;Datei zum Lesen öffnen
    Run("notepad.exe")

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

    WinWaitActive("[CLASS:Notepad]")

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

    While $a <= 5
    $Name = FileReadLine ($File, $a) ; liest den Text aus Zeile $a
    If @error Then ExitLoop ;falls Zeile nicht existiert, wird abgebrochen
    send($Name) ; Namen senden

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

    send("{ENTER}")
    $a = $a + 1
    WEnd

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

    sleep (3000)
    Send("!f")
    Send("x")

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

    WinWaitActive("Notepad")
    Send("n")

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

    WinWaitClose("[CLASS:Notepad]")

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

    FileClose ($File) ; Datei wieder schließen

    [/autoit]

    MfG Xenon

  • Xenon stellt sich kurz vor

    Hallöchen liebe AutoIt-Gemeinde,

    ich möchte mich hier auch mal kurz vorstellen:

    Mein Nickname lautet Xenon, benannt nach dem Edelgas.

    Ich wohne in Halle an der Saale (momentan Halle in der Saale wegen des Hochwassers :D ) und Programmiere schon seit einiger Zeit mit AutoIt und C++.
    Da ich zufällig hier neulich auf dieses Forum gestoßen bin, habe ich mich jetzt hier angemeldet.