Delphi – Criando um Timer com método “Anonymous”

Share Button

Porque um TTimer Anonymous ?

A vantagem em ter um TTimer usando método anônimo esta na facilidade em criar/destruir o objeto sem precisar criar o evento OnTimer para receber a mensagem.


  TTimer.createAnonymousTimer(
    function: boolean
    begin
      /// executa em loop enquanto retornar FALSE... para finalizar o Timer: retornar  TRUE; 
      return  :=  not queroContinuar();
    end, 10, 500);

   {
      AFunc -> TFunc<Boolean>
      AInterInicial ->  tempo para primeira execução
      AInterRegular ->  intervalor para as demais execuções.
   }

Ver unit: TTimer.CreateAnonymousTimer(..)