Angariar fundos para cobrir os custos logísticos do "Festival da Arte Capoeira" e apoiar o projeto Eu Sou Ninja em sua missão de promover a integração social e cultural na comunidade de Jacaraípe. Com a criação da rifa, buscamos envolver a comunidade de forma ativa no financiamento do evento, permitindo que todos contribuam para o sucesso do festival e para a continuidade das atividades do projeto. Prêmio: Copia da minha biblioteca pessoal de AdvPL/TLpp ..etc Participe da Rifa Eu já contribui. Só falta você! ```cmd Pasta de C:\GitHub\naldodj-tlpp 13/04/2024 19:17 . 19/03/2024 13:49 .. 05/01/2024 12:22 2.742 .gitattributes 14/11/2023 16:02 83 .gitignore 02/12/2023 20:08 .vscode 05/01/2024 12:05 bin 13/04/2024 19:18 4.121 ChangeLog.txt 27/12/2023 02:05 include 14/11/2023 16:02 27.030 LICENSE.txt 14/11/2023 16:02 0 makepatch.lst 14/11/2
Exemplo de uso para a classe em AdvPL: utThread ( ndjlib031.prg ). Obs.: A classe utThread é completamente dependente de tBigNThread ( tBigNThread.prg : um vez que deriva desta) então, para executar o exemplo de teste abaixo, compile, também, os programas que se encontram aqui . Ao exemplo: #include "tBigNumber.ch" #define TST_MAXTHREAD 15 user procedure ThreadT1() local oProcess:=MsNewProcess():New({||thProcess(oProcess)}) oProcess:Activate() return static function thProcess(oProcess) Local oThread:=utThread():New(oProcess) Local nThread Local nThreads:=TST_MAXTHREAD Local nValor1 Local nValor2 Local nTotal oThread:Start(nThreads) oProcess:SetRegua1(nThreads) oProcess:SetRegua2(0) For nThread:=1 To nThreads nValor1:=nThread nValor2:=(nThreads-nThread) oProcess:IncRegua2() if ((nThread%2)==0) oThread:setEvent(nThread,{"u_Sum",nValor1,nValor2}) else o