Время - Деньги

[Kurier]

Я извеняюсь... Только начинаю учить Delphi, возник вопрос:

Есть разница времени т.е. 10:00:00 - 09:00:00 ( имеем один час)
Условие: 1 час = 30 руб.
Вопрос как перевести время в сумму?

Заранее спасибо!

[Stilet]

const onehour=30;
var a,b:ttime;
begin
a:=StrToTime('09:00:00');
b:=StrToTime('10:00:00');
caption:='Рубликов='+IntToStr(HoursBetween(a,b)*30);
end;

[Kurier]

Сообщение от Stilet

const onehour=30;
var a,b:ttime;
begin
a:=StrToTime('09:00:00');
b:=StrToTime('10:00:00');
caption:='Рубликов='+IntToStr(HoursBetween(a,b)*30);
end;

[Error] Prodject.pas(46): Undeclared identifier: 'HourBetween'

[Stilet]

Uses DateUtils,...