|
|
|
|
|
|
|
|
|
|
|
versión 6.0
Milliseconds 
Entero largo
| Parámetro | Tipo | Descripción | ||||
| Este comando no necesita parámetros | ||||||
| Resultado | Entero largo |  | Número de milisegundos transcurridos | |||
| desde que se inició el equipo | ||||||
Descripción
Milliseconds devuelve el número de milisegundos ( 1milisegundo = 1 milesima de un segundo) pasados desde que se inició el equipo.
Ejemplo
El siguiente código muestra la ventana "Cronómetro" por un minuto:
Open window (100;100;300;200;0;"Cronómetro")
$vhHoraInicio:=Current time
$vlTicsInicio:=Tickcount
$vrMilisegundosInicio:=Milliseconds
Repeat
GOTO XY (2;1)
MESSAGE ("Hora...........:"+String (Current time -$vhHoraInicio))
GOTO XY (2;3)
MESSAGE ("Tics..........:"+String (Tickcount -$vlTicsInicio))
GOTO XY (2;5)
MESSAGE ("Milisegundos...:"+String (Milliseconds -$vrMilisegundosInicio))
Until ((Current time -$vhHoraInicio)>=†00:01:00†)
CLOSE WINDOW
Ver también
|
|
|
|
|
|
|
|
|
|
|