Imprimi Página | Fechar janela

Temporizador de tela

Impresso de: Helpfacil - Portal do conhecimento
Nome do Forum: ADVPL
Descrição do Forum: Dúvidas sobre a programação em ADVPL
URL:http://www.helpfacil.com.br/display_topic_threads.asp?ForumID=1&TopicID=43842
Data da Impressão: sexta-feira, 19 de agosto de 2022 at 04:11


Topico: Temporizador de tela

Postado por: AGMC
Assunto: Temporizador de tela
Data Postagem: sexta-feira, 14 de janeiro de 2022 at 15:57

Boa tarde, alguem pode me ajudar com algum exemplo de temporizador de tela, tentei   a classe TTIMER porem não surte efeito nenhum.

Atenciosamente,

Alan Gustavo
Grupo Miragina
skype:alan_miragina


Respostas:

Postado Por: 3FRAIM
Data Postagem: sexta-feira, 14 de janeiro de 2022 at 18:06

Boa tarde Alan,

Eu já usei o Ttimer em muitos fontes! Funciona bem, dentro das limitações do mesmo!

O tempo mínimo para execução é de 1 segundo, mesmo que o parâmetro passado para o Ttimer seja em milisegundos ele considera no mínimo 1000 milisegundos.

Se esse não for o seu caso, passe o seu fonte, ou o trecho do fonte onde vc usa o ttimer para que possamos entender melhor o seu caso.

Att.,

Efraim



Postado Por: AGMC
Data Postagem: sexta-feira, 14 de janeiro de 2022 at 18:17

Olá boa tarde Efraim, obrigado por me responder. Segue trecho que estou tentando utilizar:

Local aArea   := SB2->(GetArea())
Local oBrowse := NIL
Local cTitulo := "Saldos em Estoque"
Local nMilissegundos := 5000 // Disparo será 5 de em 5 segundos

//Instânciando FWMBrowse - Somente com dicionário de dados
oBrowse := FWMBrowse():New()
oBrowse:Refresh()
               
//Setando a tabela de cadastro de Autor/Interprete
oBrowse:SetAlias("SB2")

//Setando a descrição da rotina
oBrowse:SetDescription(cTitulo)

//Fitro Aplicado 1
oBrowse:SetFilterDefault("SB2->B2_LOCAL == ‘07‘")

oTimer:=TTimer():New(nMilissegundos,||alert(U_MIRA020A:Refresh()),"Atualizando..." }, )
oTimer:Activate()          

//ativa o browse
oBrowse:Activate()

RestArea(aArea)

Alan Gustavo
Grupo Miragina
skype:alan_miragina




Imprimir Página | Fechar Janela