Das Problem ist mit drei kleinen Änderungen für immer lösbar:
Delphi-Quellcode:
uses
Registry; //<<<<<< IniFiles gegen Registry tauschen
procedure TForm1.erzeugeIni(IniName:string);
var
ini: TRegIniFile; //<<<<<< TIniFile gegen TRegIniFile tauschen
begin
ini := TRegIniFile.Create('Software\' + IniName); //<<<<<< TIniFile gegen TRegIniFile tauschen
// INI-Datei erstellen (falls nicht vorhanden) und initialisieren
try
ini.WriteString('Sektion1', 'Eigenschaft1', 'Dein String');
// String in Sektion1 unter Eigenschaft1 abspeichern
ini.WriteInteger('Sektion2', 'Eigenschaft1', 1234);
// Integerwert in Sektion2 unter Eigenschaft1 abspeichern
ini.WriteBool('Sektion2', 'Eigenschaft2', True);
// Wert vom Typ Boolean abspeichern
finally
ini.Free;
// Variable ini wieder freigeben
end;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
erzeugeIni('MyKredinif');
end;
Delphi bietet für Ini auf Registry Umsteiger eine einfache Lösung. Einzig die
Unit und Klasse wechseln, der Rest kann bleiben. Das Ergebnis landet in der Registry unter
HKCU\Software\MyKredinif\...