100 puan değerinde (Threading)

[Tuğrul HELVACI]

Benim çözümümü ekteki örnek proje üzerinde görebilirsiniz.

  MsgWaitForMultipleObjects_Deneme.zip (Dosya Boyutu: 55,12 KB / İndirme Sayısı: 123)


Ama basit çözümü kod olarak da paylaşayım. Dikkatinizi CPU kullanımına çekmek istiyorum elbette.

  while Event.WaitFor(0) = wrTimeOut do
 begin
   WaitMessage;
   Application.ProcessMessages;
 end;

Yukarıdaki koddan WaitMessage API'sini kaldırırsanız, muhtemelen %10+ bir CPU kullanımınız olur, aksi durumda %0-%1 aralığında bir CPU kullanımı olacaktır.