FileRead & Schleife

  • hallo leute isch stehe wieder einmal vor einem kleinem problemchen. und zwar steht in einer TXT datei ein wort z.b "test"

    jetzt möchte ich es zeichen für zeichen auslesen und mittels send die jeweilige taste senden.

    sprich ich brauch eine schleife die mir das wort zeichen für zeichen ausliest und dann send{ZEICHEN} schreibt...
    ich komm einfach nicht auf einen grünen zweig aber vielleicht kann mir ja jemand helfen.

    vielen dnak für eure bemühungen


    edit:

    [autoit]


    $file = FileOpen("test.txt", 0)

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

    sleep(5000)
    ; Check if file opened for reading OK
    If $file = -1 Then
    MsgBox(0, "Error", "Unable to open file.")
    Exit
    EndIf

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

    ; Read in 1 character at a time until the EOF is reached
    While 1
    $chars = FileRead($file, 1)
    If @error = -1 Then ExitLoop
    send("{"&$chars&"}")

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

    Wend

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

    FileClose($file)
    habs doch rausgefunden :)

    [/autoit]

    2 Mal editiert, zuletzt von ParTy (26. Juni 2008 um 16:04)