Relogio de tempo real e numero de serie

[jackson]

Ola amigos do xharbour boa tarde, estou começando a dar uma olhadinha no xharbour, e comecei a gostar do danado, porem tenho algumas funcoes que utilizo na no clipper que no xharbour nao funcionaram. Explico: tenho o relogio de tempo real que esta numa lib chamada rel_exo.lib (showtime())e tenho uma função que me retorna um numero virtual como se fosse um numero de serie da maquina chamada rom(), (utilizo como protecao) porem quendo compilo ambas as funcoes nao funcionam pq estao compildas para 16bits, detalhe tenho o codigo fonte em c para serem utilizadas pelo clipper é claro e nao sei como modifica-las e compila-las para o c 32bits para serem utilizada pelo xharbour, será que algume pode me ajudar? se um amigo puder compila-las para mim eu agradeço, entrem em contato suporte@cminformatica.com.br
Fico muito agradecido
Jackson

[vagucs]

Jackson,

No xHarbour vc pode colocar rotinas suas rodando de tempo em tempo como se tivessem em Background.

Use assim

Código: Selecionar todos

REL_HDL=HB_IDLEADD({||RELOGIO()})
INKEY(0)
HB_IDLEDEL(REL_HDL)

FUNCTION RELOGIO
Local L,C
L=row()
C=col()
@ 0,0 say time()
@ L,C say ""

O xHarbour ja tem a função para isto ja convertida para ele e usando o mesmo recurso que te mostrei.