Registriert seit: 10. Mär 2004
1.134 Beiträge
Lazarus
|
Re: Exception bei Stringliste
18. Apr 2005, 23:43
Edit1.Text:=List[0];
falsch!
ich glaube so:
Edit1.Text:=List.Strings[0];
Aber noch eine bessere Idee:
Delphi-Quellcode:
var datei:textfile;
i:integer;
temp:string;
assignfile(datei,'dateiname');
reset(datei);
for i:=1 to EDITS_COUNT do
begin
readln(datei, temp);
TEdit(FindComponent('Edit'+inttostr(i)).text :=temp;
end;
closefile(datei);
Letzter Tipp: Drogen. Machen zwar nicht glücklich, geben einem aber wenigstens das Gefühl glücklich zu sein.
Have a lot of fun!
|