Wie soll denn das auch funktionieren?
Du packst das ganze ins FormCreate ohne
dateiname vorher einen sinnvollen Wert zu geben. Daher kann natürlich auch kein Dateiname aus einer Datei gelesen werden.
Generell solltest du sowieso auf jeden Fall vor jedem Öffnen einer Datei prüfen, ob diese überhaupt existiert:
Delphi-Quellcode:
if FileExists(dateiname) then
//...
@mkinzler:
read (datei, zeile1);
würde nur das erste Zeichen der Datei einlesen.
Axel Sefranek
A programmer started to cuss, cause getting to sleep was a fuss.
As he lay there in bed, looping round in his head
was: while(!asleep()) ++sheep;