Sentencia Update no se ejecuta en código Delphi

[ecfisa]

Hola.

Hay mucho que se puede optimizar de tu código como por ejemplo traer año, mes y día diréctamente desde la consulta, pero sería importante saber:

• ¿ Que tipo y formato tiene la columna fec_nacim ?
• ¿ Que operación buscas realizar en la línea ?
  

  Código Delphi [-]
   FecCap := floattostr(trunc((Date - StrToDate(txt_Fec_Nacim))/365));

Otra cosa que no entiendo es el por que de armar la cadena de consulta de este modo:

Código Delphi [-]
...
    txt_Query:='';
    txt_Query:='UPDATE Secce0 ';
    txt_Query:=txt_Query+'SET Edad = ';
    txt_Query:=txt_Query+FecCap;
    txt_Query:=txt_Query+' WHERE Rfe_Llave = "';
    txt_Query:=txt_Query+txt_Rfe_Llave;
    txt_Query:=txt_Query+'"';
...

cuando es exáctamente lo mismo hacerlo así:

Código Delphi [-]
  txt_Query:= Format('UPDATE Secce0 SET Edad = %s WHERE Rfe_Lave = "%s"', [FecCap, txt_Rfe_Llave]);

Saludos