disparar um processo

[pena]

boa noite, como faço para disparar um processo de tempo em tempo, no menu principal, tenho um atalho para um programa que lista os pedidos do dia que ainda nao foram faturados, num determinado terminal isto fica aberto o dia todo, mas o caixa precisa pressionar o botao de consulta para atualizar o grid, como fazer esta rotina se atualizar de x minutos?

[Toledo]

Amigo, use o comando TIMER.

Código: Selecionar todos

DEFINE TIMER Timer_1 OF Nome_Form INTERVAL nTempo * 60000 ACTION AtualizaGrid()

Abraços

[pena]

:)Pos

[pena]

preciso de mais uma ajuda neste topico, depois que eu ativo o processo, como desativo?

[Toledo]

Para finalizar o TIMER:

Código: Selecionar todos

Nome_Form.Timer_1.release

Abraços

[bjbernal]

Para habilitar ou desabilitar, sem finalizar:

NomeForm.timer_1.enabled := .f. // desabilita
NomeForm.timer_1.enabled := .t. // habilita

Exemplo de uso:

NomeForm.timer_1.enabled := .f. // desabilita para executar outra rotina
rotina()
NomeForm.timer_1.enabled := .t. // volta a habilitar depois de executar a rotina

[pena]

obrigado a todos :)Pos

[Poka]

Olá a todos

Toledo disse

Código: Selecionar todos

Amigo, use o comando TIMER.

Este comando realmente facilita muitas coisas.

Toledo, ou algum outro colega poderia dar uma ajuda como resolver o seguinte problema.

Sempre quis fazer estando em um browse de clientes pro ex: teclar o A e não ALT A como é o normal.

explicando:

Saio da tela PRINCIPAL e vou para
cliente.browse
onde estão os botoes de Incluir Alterar , etc.
ativo timer
define timer tecla of TELAPESQ interval 1000 action tecla()
a funcao tecla() testa qual tecla apertei.
antes de ir para a tela de alteração desativo o timer, quando volto ativo.
até ai tudo perfeito.

o problema
se estou no principal, ou qualquer outra tela do sistema e teclar o A , não acontece nada, mas quando entro CLIENTE.BROWSE e ativo o timer já entra alterando.
Como solucionar isso.
Não sei fiz por me entender.

Agradeço qualquer ajuda.

Poka

[Toledo]

Amigo, não seria o caso de usar o comando CLEAR TYPEAHEAD quando entrar em cliente.browse, antes de ativar o Timer?

Abraços

[Poka]

Obrigado Toledo por responder.

Também pensei nisso , testei novamente agora, não resolveu.
Alem disso se vou para a rotina de inclusao, se preencher um campo que termine com A quando volta vai para alteração novamente.

Estranho né. CLEAR TYPEAHEAD era para resolver. Ele não limpa o buffer to teclado?


Poka

[Claudio Soto]

CLEAR TYPEAHEAD funciona sólo en modo consola, en HMG así como en las otras lib gráficas el manejo del teclado se hace mediante los mensajes de Windows.

[Clipper]

Você pode antes de entrar inserir uma tecla nula no buffer.

Exemplo:

Keyboard Chr(255)
Telapesq()
...
...

Até logo.

Marcelo

[Poka]

Obrigado Dr. Cláudio por responder.

Marcelo Obrigado, Não deu certo. Acho que é só para console também. Tem outra Ideia ?



Poka

[Claudio Soto]

Obrigado Dr. Cláudio por responder.

Marcelo Obrigado, Não deu certo. Acho que é só para console também. Tem outra Ideia ?



Poka

En HMG oficial existe:

http://www.hmgforum.com/hmgdoc/data/Rea ... _Mouse.htm

[Clipper]

Tenta colocar INKEY(.2) antes.

A função Inkey() eu sei que funciona na Minigiu.

Boa sorte.

Marcelo