alternativ kannst du auch eine solche ini-datei anlegen:
Delphi-Quellcode:
linecount=5
line1="erste"
line2="zweite"
line3="dritte"
...
und dann halt einlesen:
Delphi-Quellcode:
memo1.lines.clear;
c:=readInteger('section','linecount',0);
for i:=1 to c do
begin
Memo1.Lines.Add(ini.ReadString('section','line'+IntToStr(i),''));
end;
oder so, wie ich es in meine Sprachdateien mache:
Delphi-Quellcode:
function ConvertLineBreak(s:string):string;
var p:integer;
begin
p:=pos('\n',s);
while p>0 do
begin
s[p]:=#13;
s[p+1]:=#10;
p:=pos('\n',s);
end;
result:=s;
end;
s:='erste\nzweite\ndritte';
s:=ConvertLineBreak(s);
Gruß Frank