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: sábado, 20 de abril de 2024 at 00:22 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 |