Inhalt einer Stringlist laden

[sakura]

Mache das Bild bitte als Anhang
Und ersetze die [ CODE ] Tags durch [ DELPHI ] Tags

und nun zum Laden

Code:

procedure laden;
begin
[color=#ff0000]  save := TStringList.Create;
  try
   save.LoadFromFile('c:\bsp.txt') ;[/color]
   a:=strtoint(save.Strings[0]);
  finally
    freeandnil(save);
  end;
 end;

......