Thema: Delphi erzeugen einer TInifile

Einzelnen Beitrag anzeigen

marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#9

Re: erzeugen einer TInifile

  Alt 25. Jun 2005, 16:23
Hallo Haegar,

ein Programm braucht eigentlich immer zwei INI-Dateien. Die erste liegt bei meinem Programm im Installationsverzeichnis. Sie wird nur gelesen und dient der Konfiguration durch den Administrator.

ini := TIniFile.Create(ChangeFileExt(ParamStr(0), '.ini')); Die zweite ist benutzerbezogen und enthält die impliziten (Fenstergrößen und -positionen, etc.) und expliziten Einstellungen (Hauptmenü: Optionen, Ansicht, etc.) des Benutzers.

Delphi-Quellcode:
resourcestring
  ENV_APPDATA = 'APPDATA';

function AppDataDir: string;
begin
  Result := GetEnvironmentVariable(ENV_APPDATA);
end;

begin
  ini := TIniFile.Create(AppDataDir + ChangeFileExt(ExtractFileName(ParamStr(0)), '.ini');
  ...
end;
Leichte Variationen je nach den Betriebsrichtlinien der Kunden existieren - das Konzept bleibt immer gleich.

Grüße vom marabu
  Mit Zitat antworten Zitat