[ecfisa]

Hola JXJ.

Usá la función IncHour de la unit DateUtils.

En el ejemplo que te hice se le restan cuatro horas a la hora actual:

Código Delphi [-]
...
uses DateUtils;

procedure TForm1.Button1Click(Sender: TObject);
var
  MDate: TDateTime;
  Horas: Integer;
begin
  MDate:= Now;
  Horas:= 4; // Nro de horas
  MDate:= IncHour(MDate, - Abs(Horas)); // Abs, por si Horas < 0
end;

Saludos.