Source position: time.pas line 117
procedure SetTime(
Hour: Word;
Minute: Word;
Second: Word;
Sec100: Word
);