Hallo!
Ich sitze an einem misteriösem Problem:
Zuerst der Code:
Delphi-Quellcode:
var datuf:textfile;
pstr1:string;
x:integer;
datu: array of string;
{...}
assignfile(datuf,pstr1);
rewrite(datuf);
X:=1;
while not Eof(datuf) do
begin
SetLength(datu,X+1);
Readln(datuf,datu[x-1]);
x:=x+1;////////////////////////
end;
{...}
Hier Die Fehlermeldung:
Zitat:
An unhandled
exception occurred at $080484C3 :
Exception : Unknown
Run-Time error : 104
$080484C3 main, line 117 of project1.lpr
Zeile 117 ist die Markierte.
Hat einer von euch ne´ Ahnung?
gruß Teekeks
[edit]
Fehler gefunden: es muss
reset(datuf);
heißen.