Jetzt hättest du ihm aber auch noch einen Prozedurkopf, ein try..finally..end und ein SL.Free gönnen können. Dann lernt er es als Anfänger auch gleich richtig.
Delphi-Quellcode:
procedure LadeDatei();
var
SL: TStringList;
begin
SL:= TStringList.Create;
try
SL.LoadFromFile('MeineDatei.txt');
DoSomeThingWithContent(SL);
finally
SL.Free;
end;
end;