ja...habs mal ausprobiert..
aber ich krieg noch nen exeption fehler:
Delphi-Quellcode:
procedure readinifile(dateiname: string);
begin
assignfile(F, 'd-e.ini');
reset(F);
while not EOF(F) do
begin
readln(a);//<--------------Hier liegt der Fehler
setlength(liste, length(liste) +1 );
readln(a);
liste[high(liste)].deutsch := a;
readln(a);
liste[high(liste)].englisch := a;
end;
closefile(F);
end;
[edit] Fehler: EInOutError [/edit]