Difference between revisions of "ConvertTime"

Revision as of 13:32, 15 November 2011

Definition

procedure ConvertTime(const ms: Integer; var 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