The MinuteOfTheDay function returns the number of minutes from the specified TDateTime value AValue, and 12:00 A.M. of the same day.

Declaration: Function MinuteOfTheDay( const AValue : TDateTime) : Word;

An example of its use.

procedure ScriptEvent (var Value : variant);
var
TheMin : word;
begin
//The number of minutes so far today ....
TheMin := MinuteOfTheDay(Now);
LogInfo('Number of minutes is ....' + InToStr(TheMin);
LogInfo('');
end;