Nesse vídeo demonstraremos a utilização da função WaitAMinute, que serve para pausar a execução da thread por 3 segundos.
Inscreva-se no Canal
Abaixo o código fonte desenvolvido para o exemplo em vídeo acima:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 | //Bibliotecas#Include "TOTVS.ch"/*/{Protheus.doc} User Function zExe529Pausa a execução da função por 3 segundos@type Function@author Atilio@since 06/04/2023@obs Função WaitAMinute Parâmetros Função não tem parâmetros Retorno Função não tem retorno **** Apoie nosso projeto, se inscreva em https://www.youtube.com/TerminalDeInformacao ****/*/User Function zExe529() Local aArea := FWGetArea() Local cInicio := "" Local cTermino := "" //Aciona a rotina para esperar 3 segundos e marca o tempo antes e depois cInicio := Time() WaitAMinute() cTermino := Time() //Mostra a diferença de tempo FWAlertInfo("Total espera: " + ElapTime(cInicio, cTermino), "Teste WaitAMinute") FWRestArea(aArea)Return |
Bom pessoal, por hoje é só.
Abraços e até próxima.
