Hola diablo66,
Prueba con esto, sencillo, claro y fácil de entender.
Código Delphi
[-]
...
begin
with Qry do
begin
Close;
SQL.Add('UPDATE Categorias');
SQL.Add(' SET');
SQL.Add(' NOMBRE = ' + QuotedStr(txtCategoria.Text));
SQL.Add(' ,CUENTA = ' + txtClave.Text));
SQL.Add(' ,FECHA_UMOV = ' + QuotedStr(FormatDateTime('dd/mm/yyyy', date)));
SQL.Add(' WHERE CLAVE = ' + IntToStr(iClave));
ExecSQL;
Close;
end;
end;
Un saludo.