Fehlermeldung bei AssignFile

[blauweiss]

Hallo MSError,

in Deinem Code fallen einige Sachen auf...
die beiden wichtigsten:
1. wieso verwendest Du OpenDialog1.Execute, um danach OpenDialog1.FileName im Code wieder zu überschreiben ? Oder soll der OpenDialog1 nur zum Wechseln des Verzeichnisses dienen...?
Und wie Luckie bereits erwähnt hat, würde ich den kompletten (absoluten) Pfad zur Datei mit angeben.
2. anstatt
If IOResult <> 0 Then muss es heißen
If tmpIOResult <> 0 Then denn IOResult ist eine Funktion, die beim ersten Aufruf den letzten I/O-Status liefert, ab dem nächsten Aufruf aber immer 0 zurückliefert.

Gruß,
blauweiss