In die Registrierung schreiben

Erklärung
Die Unit Registry einbinden, damit mit der Registry gearbeitet werden kann. Dann den Datentyp TRegistry initialisieren, den Root und den Key öffnen. Durch TRegistry.WriteString einen String in den Defaultwert schreiben und durch TRegistry.WriteFloat für Test den Wert 333.4342 speichern. Am Ende den Datentyp TRegistry wieder freigeben.

Quelltext
Wichtig: in die Uses-Klausel REGISTRY aufnehmen
  uses Registry;

procedure TForm1.FormCreate(Sender: TObject);
var R: TRegistry;
Begin
//Datentyp initialisieren
R := TRegistry.create;

(* Root öffnen
Wichtigste Roots:
hkey_local_machine;hkey_current_user*)
R.RootKey := HKEY_LOCAL_MACHINE;

//Key öffnen
R.OpenKey('SOFTWARE\DELPHI-TIPPS\',true);

//Einen String in den Defaultwert schreiben
R.WriteString('','Delphi ist cool!!!');

(* Einen Float(Fließkommazahl) mit Wert 333,4342 und Namen 'Test' eintagen
Achtung: Es erscheint in der Registrierung mit Regedit ein anderer Wert.
Wird der Wert aber von einem Programm ausgelesen, so stimmt er *)
R.WriteFloat('Test',333.4342);

R.Free

end;