El componente Timer de la pestaña System te puede servir.
En el interval pones cada cuanto tiempo se va a ejecutar tu funcion y listo.
Ten en cuenta que si el interval es 1000, se ejecuta tu funcion cada segundo
para ejecutarlo cada hora deberias poner un interval de 3600000
En el evento Ontimer:
Code:
procedure Tform1.Timer1Timer(Sender: TObject);
begin
//Pon aqui la llamada a tu funcion
Ejecutar_Funcion1(tal,cual); //por ejemplo
end;