import.css=/download/attachments/6062824/tecnologia.css
Retorna o valor da hora atual em milissegundos.
LET var = GetTickCount()
Nome
Tipo
Descrição
var
Inteiro
Retorna a constante referente a hora/segundos/milissegundos atual.
MAIN DEFINE l_texto CHAR(150) DEFINE l_tempo_ini INTEGER DEFINE l_tempo_fim INTEGER LET l_tempo_ini = GetTickCount() Sleep(3) LET l_tempo_fim = GetTickCount() LET l_texto = "INI ",l_tempo_ini," - FIM ", l_tempo_fim CLIPPED, " INTERVALO = ",l_tempo_fim - l_tempo_ini CALL CONOUT(l_texto) END MAIN