Was hast du denn da vor?
Ich würde es so machen:
- Form 1 öffnen
- Integerwert in INI-File speichern
- Beim wiederöffnen, INI-Wert lesen, um eins erhöhen usw
Das sähe so aus
Delphi-Quellcode:
uses
{...,} IniFiles;
procedure TForm1.FormCreate(Sender: TObject);
var
ini: TiniFile;
iCount: Integer;
begin
try
ini := TIniFile.Create('C:\count.ini');
iCount := ini.ReadInteger('Openings', 'Counts', 1);
iCount := iCount + 1;
ini.WriteInteger('Openings', 'Counts', iCount);
finally
ini.Free;
end;
end;