La Web del Programador: Comunidad de Programadores
 
https://www.lawebdelprogramador.com/preguntas/

    Pregunta:  22820 - COMO AGREGAR,LEER,BORRAR O MODIFICAR DATOS DEL REGISTRO
Autor:  Hector Garza Coronado
Necesito alguna ayuda con los API sobre el registro de windows. Como agragar, leer, borrar, o modificar datos del registro. Gracias
  Respuesta:  xavier bravo
te envío un código que enviaron al clubdelphi.com, con el que se puede consulta, o añadir si no existen, unas claves en el registro de Windows. (viene de clubdelphi)

En el Uses tienes que añadir Registry, Windows

procedure leerRegistro();
var Registre: TRegistry;
begin
Registre := TRegistry.Create;
Registre.RootKey := HKEY_LOCAL_MACHINE;
Registre.OpenKey('\Software\iData\GestOptic', True);
if ((not Registre.ValueExists('Servidor')) or (not Registre.ValueExists('BaseDeDades')) or (not Registre.ValueExists('Usuari'))) then begin
try
Registre.WriteString('Servidor', 'SERVIDOR');
Registre.WriteString('BaseDeDades', 'GestOptic');
Registre.WriteString('Usuari', 'SA');
except
Application.MessageBox('Por favor, la primera ejecución' + chr(13) + chr(10) + 'la debe realizar un Usuario con derechos de Administración', 'Atención', IdOk);
end;
end;
Connexio_Servidor := Registre.ReadString('Servidor');
Connexio_BaseDeDades := Registre.ReadString('BaseDeDades');
Connexio_Usuari := Registre.ReadString('Usuari');
Registre.CloseKey;
Registre.Free;
end;