ConvertTime

Definition

procedure ConvertTime(const MS: Integer; out H, M, S: Integer);

Availability

SCAR Divi 3.00 > Current

Description

Converts a number of milliseconds given in MS into a number of hours, minutes and seconds returned in H, M and S.

Example

var
  h, m, s: Integer;
begin
  ConvertTime(1000000, h, m, s); 
  WriteLn('1000000ms is ' + IntToStr(h) + 'h, ' + IntToStr(m) + 'm, ' + IntToStr(s) + 's');
end.

Output:

1000000ms is 0h, 16m, 40s