[[Lepe]]

En realidad sólo necesitas esta linea:

Código Delphi [-]
   property Variable: double read GetVariable write FVariable;

ahora pulsas CTRL + SHIFT + C (class completion de delphi) que generará todo lo demás.

Igual que estás usando el get, puedes usar el set:

Código Delphi [-]
private 
  Fvari :integer;
  
properyt Vari:integer read GetVari write SetVari;

y vuelta con el class completion jeje.

Ahora cuando necesites el valor, lo rescatas de la BBDD en GetVari y cuando el usuario le asigna el valor, se ejecuta SetVari y en ese procedimiento es donde lo guardas en la BBDD.

Si te gusta la opción de Neftali, pues get y set lo único que hacen es actualizar el valor de FVariable, después en el FormClose es cuando grabas los valores a la BBDD.

Edito: aquí te falta un pequeño detalle, asignar el result, supongo que será al tiempo de escribir en el foro:

Código Delphi [-]
function TForm1.GetVariable:double
begin
   FVariable:= {leo el valor de la base de datos}
   Result := FVariable;
end;

"Ahora es un lío" después será mecánico

Saludos