Ini Dateien - ReadSections

[Bjoerk]

ReadSections gibt TStrings zurück.

Delphi-Quellcode:

function LadeDatum: TStrings;
begin
  Ini.ReadSections(Result);
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  SL: TStringList;
begin
  Ini:= TIniFile.Create( .. );
  SL:= TStringList.Create;

  SL.AddStrings(LadeDatum);

  ... 
 
  SL.Free;
  ini.Free;
end;