Cronômetro em tempo real

[spereira]

Galera,

Alguém sabe se há alguma rotina de cronômetro em tempo real, como a do relógio digital, mas que fique mostrando o tempo decorrido durante a utilização do aplicativo num canto da tela?

Ao entrar no meu aplicativo, quero que comece a contar o tempo crescente ou decrescente e mostrar na tela o processo.

Alguém conhece alguma rotina ou alguma dica de como fazer isto?

Desde já agradeço.

[Daniel]

Ola

Teste este exemplo, ele usa a lib 'grump52 e ct' para modo normal
e 'grump52m e ctp' para modo extend se vc nao tiver mande um email

Código: Selecionar todos

/*
    Programa: ONTICKX.PRG
    Lib     : Grump52 e CT
*/

Set Scor Off

Cls
@ 0, 47 Say 'Tempo de Uso do Sistema'

tInicial:= Seconds()
gfontick('Show_Time', 5)
nNome:= Space(40)
@ 12, 10 say 'teste' Get nNome Picture '@!'
Read

*****************************
Function Show_time()
Local Local1:= Row(), Local2:= Col()

tUso:= (Seconds() - tInicial)
@ 0, 72 Say SecToTime(tUso)
SetPos(Local1, Local2)

//denobie@pop.com.br