Source position: ovcdate.pas line 166
procedure StTimeToHMS(
T: TStTime;
var Hours: Byte;
var Minutes: Byte;
var Seconds: Byte
);