Delphi und ini-Files geschrieben am 23.08.2005

Um mit ini-Files in Delphi zu arbeiten definiert man in der uses Anweisung:

Delphi/Pascaluses IniFiles;

Möchte man einen String-Wert lesen kann man so vorgehen:

Delphi/Pascalfunction readINIstring(filepfad,bereich,tag:string):string;
var  DateiIni: TIniFile;
begin
 DateiIni := TIniFile.Create(filepfad);
 result:='';
 with DateiIni do
  begin
   result:=ReadString(bereich, tag,''); //bereich,tag,default
   Free;
  end;
end;

das schreiben eines Strings geht so:

Delphi/Pascalprocedure writeINIstring(filepfad,bereich,tag,wert:string);
var  DateiIni: TIniFile;
begin
 DateiIni := TIniFile.Create(filepfad);
 with DateiIni do
  begin
   WriteString(bereich, tag, wert);
   Free;
  end;
end;

Für andere Variabel-Arten benutzt man dann:

Delphi/Pascal
ReadInteger(bereich, tag,0);
WriteInteger(bereich, tag, wert);
Readbool(bereich, tag,false);
Writebool(bereich, tag, wert);

Möchte man eine Section löschen kann man folgende Prozedur verwenden:

Delphi/Pascalprocedure clearINIsec(filepfad,section:string);
var  DateiIni: TIniFile;
begin
 DateiIni := TIniFile.Create(filepfad);
 with DateiIni do
  begin
   EraseSection(section);
   Free;
  end;
end;