version 6.0
Milliseconds Longint
| Parameter | Type | Description | ||||
| This command does not require any parameters | ||||||
| Function result | Longint | Number of milliseconds elasped | ||||
| since the machine was started | ||||||
Description
Milliseconds returns the number of milliseconds (1000th of a second) elapsed since the machine was started.
Example
The following code displays the "Chronometer" window for one minute:
Open window (100;100;300;200;0;"Chronometer")
$vhTimeStart:=Current time
$vlTicksStart:=Tickcount
$vrMillisecondsStart:=Milliseconds
Repeat
GOTO XY (2;1)
MESSAGE ("Time...........:"+String (Current time -$vhTimeStart))
GOTO XY (2;3)
MESSAGE ("Ticks..........:"+String (Tickcount -$vlTicksStart))
GOTO XY (2;5)
MESSAGE ("Milliseconds...:"+String (Milliseconds -$vrMillisecondsStart))
Until ((Current time -$vhTimeStart)>=00:01:00)
CLOSE WINDOW
See Also