Mit folgendem Code kann man ohne Probleme einen DWord-Wert in die Registry von Windows schreieben
Delphi-Quellcode:
procedure WriteDWordToRegistry(Key, Data: string; Value : Integer)
var
Pruefung: TRegistry;
begin
Pruefung := TRegistry.Create(); //Registry initialisieren
Pruefung.RootKey := HKEY_CURRENT_USER; //Root-Schlüssel öffnen
Pruefung.OpenKey(Key, true); //Schlüssel öffnen
Pruefung.WriteBinaryData(Data, Value, SizeOf(dword)); //Wert schreiben
Pruefung.Free; //Speicher wieder freigeben
end;