Home » PlItems » INI-Datei lesen (Delphi)

INI-Datei lesen

ID78
Link ReferenceNot set
Link CreditsNot set
Link Technical DocumentationNot set
PlCodelangDelphi
PlGroupAnwendungskonfigurationsdateien
PlItemTitleINI-Datei lesen
Codeuses
IniFiles;

var
iniMem: TMemIniFile; // ini-File (ready only one time)

// Load the ini-information once - maybe at startup
function TMyForm.LoadIniFile:boolean;
var
SL : TStringList;
return : Boolean;
iniFile : String;
begin
iniFile:='myFormConfig.ini';
return:=true;
if not FileExists(ExtractFilePath(Application.Exename)+iniFile) then
begin
MessageDlg('ini-File not found!', mtError, [mbOK], 0);
return:=false;
end;
if not return then halt;

iniMem:=TMemIniFile.Create('');
SL:=TStringList.Create;
SL.LoadFromFile(ExtractFilePath(Application.Exename)+iniFile);

iniMem.SetStrings(SL);
LoadIniFile:=return;
end;

procedure TMyForm.DoThis;
begin
ShowMessage(iniMem.ReadString('Section','Attribute','Default-Value'));
end;
Result Example