delphi4arab منتديات دلفي للعرب

نسخة كاملة : ملتي ثريدينق في دلفي xe
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم
لاستخدام الثريد استخدم هذا
PHP كود :
procedure TForm1.SpeedButton5Click(Sender: TObject);
var    
TID : DWORD;
     
hThread : Hwnd;
begin
hThread 
:= CreateThread(nil,0,@procd,nil,0,TID);
CloseHandle(0);
end; 
الاسئلة
كيف لي ان احدد عدد الثريد ؟ وهل البرنامج يعمل بتسلل اذا كان اكثر من ثريد ؟
كيف يتم اغلاق الثريدعن الانتهاء وكلوس هندل(0) هل يعني هذا ان مقبض الثريد = 0 ؟ دائما ؟
البرنامج يعمل لايكن عند نهاية البرسدير يضهر خطا من السيستم رقمه 5 !! ; والبرنامج ينتهي
[صورة: 20120102151806.jpg]
هل هذه الكتابة صحيحة ؟
هل عدم تحرير الثريد يشكل مشكل ؟ او انه يتحرر بانتهاء مهمته ؟
PHP كود :
var
 
TID : DWORD;
hThread : Hwnd;
begin
try
hThread := CreateThread(0,0,@proc,0,0,TID);
  
//WaitForSingleObject(hThread, INFINITE);
finally
  
closehandle(hThread);
end; 
وعليكم السلام ورحمة الله
هناك أنماط ودوال جاهزة عوض Windows API
ومع ظهور ملامح تعدد المنصات (في XE2) يستحسن الابتعاد عن API 32bit
إقتباس :هل عدم تحرير الثريد يشكل مشكل ؟ او انه يتحرر بانتهاء مهمته ؟
انظر:
http://www.delphi4arab.net/forum/showthr...p?tid=2131
مواضيع في المنتدى حول ذلك، أنظر:
http://www.delphi4arab.net/forum/showthr...p?tid=2706
بالتوفيق.