Delphi-Quellcode:
//schreiben
...
begin
IniFile := ChangeFileExt(ParamStr(0), '.ini'); //IniFile ist ein String mit dem IniPfad
with strgrid do
...
Ini :=TIniFile.Create(ExtractFilePath(ParamStr(0))+'myinifile.ini'); //hier hast du einen eigenen Pfad
try
...
end;
Delphi-Quellcode:
//lesen
...
begin
IniFile := ChangeFileExt(ParamStr(0), '.ini'); //IniFile ist ein String mit dem IniPfad
with strgrid do
..
Ini := TIniFile.Create(IniFile); //hier benutzt du den String IniFile für dern Pfad
try
...
Du gibst verschiedene Pfade an, deshalb schreibt er in eine Ini und liest aus einer anderen.
Das ist auch der Grund wieso man den Ini-Pfad, wenn man es auf verschiedene Prozeduren verteilt, am besten immer in eine Funktion packt. Dann kann man sich nicht verschreiben. Zum Beispiel so:
Delphi-Quellcode:
function IniFile: String
begin
Result := ChangeFileExt(ParamStr(0), '.ini');
end;