Difference between revisions of "ConvertTime"
From SCAR Divi Manual
(Created page with "==Definition== <source lang="scar" lines="false"> procedure ConvertTime(const ms: Integer; var h, m, s: Integer); </source> ==Availability== SCAR Divi 3.00 > Current ==Descript...") |
|||
| Line 1: | Line 1: | ||
==Definition== | ==Definition== | ||
<source lang="scar" lines="false"> | <source lang="scar" lines="false"> | ||
| − | procedure ConvertTime(const | + | procedure ConvertTime(const MS: Integer; out H, M, S: Integer); |
</source> | </source> | ||
Revision as of 12:17, 4 April 2012
Contents
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
