Home » PlGroups » Anwendungskonfigurationsdateien

View PlGroup Anwendungskonfigurationsdateien

ID	27
Text	Anwendungskonfigurationsdateien
Title	Not set

PlItems

uses 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;