Rotina

Olá amigos, sou novato em delphi e estou precisando de uma rotina, seria mais ou menos assim.
EX: seria como um estacionamento de veiculos preciso que, a cada intervalo de horas determinada seria acrescentado mais uma diaria.

Obrigado.