Clipboard zeilenweise lesen

Moin,

Ziel ist es den Inhalt des Clipboards zeilenweise zu lesen und zu verarbeiten. Dazu habe ich den Inhalt in eine Datei gespeichert, damit ich diese mit FileReadLine lesen kann. Allerdings wird dabei scheinbar nie das Ende der Datei erreicht. Woran kann das liegen?

$clip = ClipGet()
$datei = FileOpen("txt.txt", 2)
FileWrite($datei, $clip)
FileClose($datei)
$datei = FileOpen("txt.txt", 0)
$clip = ''

While 1
$zeile = FileReadLine($datei)
MsgBox(0,"",$zeile)
If @error = -1 Then ExitLoop EndIf
;Hier wird was mit der Zeile gemacht und $clip wieder gefüllt
Wend

ClipPut($clip)

Ja das funktioniert. Aber ist das nicht das, was man gerade nicht machen sollte?

Siehe Hilfe:

Zitat

In Hinblick auf Geschwindigkeit ist es keine gute Idee, eine Datei zeilenweise einzulesen, indem der line-Parameter jeweils um 1 erhöht wird. Dadurch ist AutoIt gezwungen, die Datei jedesmal neu vom Beginn bis zur angegebenen Zeile einzulesen.

Zitat von Schnitzel

*g* ok dann solltest du aber nicht mit filereadline arbeiten

Ich dachte, wenn mit dem Dateihandle gearbeitet wird merkt er sich wo er steht und liest nicht von oben erneut.

Danke bluelamp für die Optimierung der Version von Schnitzel. Wenn die Datei entfällt ist es sogar noch besser. Danke auch dir Schnitzel für deine Vorschläge.