[ecfisa]

Hola emeritos.

Si deseas almacenar el cambio:

Código Delphi [-]
uses DateUtils;

...
begin
  with IBDataSet1 do
  begin
    Edit;
    FieldByName('CAMPO_TIME').Value:= IncSecond(FieldByName('CAMPO_TIME').Value, -1);
    Post; 
    crono.Caption := FieldByName('CAMPO_TIME').Value;
  end;
end;

Si no:

Código Delphi [-]
uses DateUtils;
...
begin
   crono.Caption := TimeToStr(IncSecond(IBDataSet1.FieldByName('CAMPO_TIME').Value, -1));
end;

Saludos