Ver Mensaje Individual
  #2  
Antiguo 13-09-2007
afxe afxe is offline
Miembro
 
Registrado: jul 2004
Ubicación: Malaga-España
Posts: 295
Reputación: 22
afxe Va por buen camino
Suma los valores a la fecha:

Bien... Crearemos una función de manera que se le pueda sumar el valor de tiempo que quieras a una variable de tipo TDateTime:

Código:
function ActualizaTiempo(ElTiempo:TDateTime; hh, mm, ss: word): TDateTime;
begin
  try
    Result := ElTiempo + EncodeTime(hh, mm, ss);
  except
    Result := ElTiempo;
  end;
end;
Ahora suponte que tienes tu campo TimeStamp que se llama MiHora, pues para sumarle 5 minutos sería;

Código:
  MiQuery.Edit;
  MiQueryMIHORA.AsDateTime := ActualizaTiempo(MiQueryMIHORA.AsDateTime, 0, 5, 0);
  MiQuery.Post;
Lo he hecho de memoria, sin probar, pero si tiene alguna incidencia estoy seguro que sabrás solventarla y perdonarla.

Saludos
Responder Con Cita