Delphi - help incidir en el Registro

Lo que trato de hacer es incidir en el registro de Windows, por ejemplo tengo un CheckBox1 ahora cuando lo marco me redimensiona mi form mas corto o más largo

procedure TForm2.CheckBox1Click(Sender: TObject);
begin
if CheckBox1.Checked then
begin
Form2.Height:=100;
CheckBox1.Checked:=true;
CheckBox1.Caption:='Activa Fondo';
CheckBox1.Hint:='Fondo Desactivado';
end
else
begin
Form2.Height:=773;
CheckBox1.Checked:=false;
CheckBox1.Caption:='Desactiva Fondo';
CheckBox1.Hint:='Fondo Activado';
end;
end;

Ok hasta ahí no hay problema el lio está en que cada vez que entre o salga del programa los cabios no se guarda.

Como puedo lograr que si yo dejo el programa con Form2.Height:=100; cuando entre de nuevo se mantenga y viceversa.

Lógico que no se mantenga, cuando vuelves a entrar aparecerá como tu lo diseñaste.

Puedes guardar los valores en algún sitio, y en el evento OnCreate del form leer estos valores y dale la dimensión que corresponda con ese mismo código que tienes en el CheckBox.
Con esto incluso cada vez que cargues la aplicación tendrás las mismas dimensiones usadas la última vez.

Esto te puede servir

http://delphiallimite.blogspot.com/2006/08/guardando-y-cargando-opciones.html

Además de las opciones que hay en esa dirección, otra posibilidad es crear una tabla en tu base de datos, y guardar en ella esos valores para leerlos cuando lo necesites.
Puede ser un solo registro con tantos campos como datos tienes que guardar, o un solo campo con tantos registros como datos tienes que guardar.

Mi esto es lo que necesito claro funcionando

procedure TForm1.CheckBox1Click(Sender: TObject);

var Reg: TRegistry;
begin // Creamos un objeto para manejar el registro Reg := TRegistry.Create;
// Guardamos las opciones
try Reg.RootKey := HKEY_LOCAL_MACHINE;
if Reg.OpenKey( 'SoftwareMiPrograma', True ) then
begin
if CheckBox1.Checked then
label1.Caption:='si';


Reg.CloseKey;
end;
finally Reg.Free;
end;
end;

a si desmarco el CheckBox1 por ejemplo que ponga (no)