Primoz Gabrijelcic, acaba de disponibilizar a Omni Thread Library, uma biblioteca para simplificar a utilização de Threads.

Com esta biblioteca um método pode ser executado em uma thread separada sem a necessidade de criar uma classe descendente de TThread:


procedure TfrmTestOTL.btnBeepClick(Sender: TObject);
begin 
   CreateTask(Beep, 'Beep').Run;
end;


procedure TfrmTestOTL.Beep(Task: IOmniTask);
begin  
  MessageBeep(MB_ICONEXCLAMATION);
end;

 

image

 

Referências

Bookmark and Share: