Zitat von
Privateer3000:
blick nich durch...
Geht das etwas präzisier? Und was ist daran so schwer?
Delphi-Quellcode:
var
sl: TStringList;
i: Integer;
begin
sl := TStringList.Create;
try
sl.LoadFromFile(Filename);
for i := 0 to sl.Count-1 do
Richedit1.Lines.Add(sl.Strings[i]);
finally
sl.Free;
end;
Delphi-Quellcode:
var
F: TextFile;
s: String;
begin
AssignFile(F, Filename);
reset(F);
while not EOF(F) do
begin
readln(F, s);
RichEdit1.Lines.Add(s);
end;
Steht alles in der Hilfe.