11-03-2010, 06:04 PM
ولكن اخي الكريم TF6M هنا سيحدث Thread Collison في حالة تم الظغط على [FONT=Simplified Arabic Fixed]Button1 لانه سوف يتم انشاء نفس ال Thread يمكن ان يكون باHandle جديد و لكن سوف يتم انشاءى و هذا ماسيحدث خلل في تحريره مرة اخرى لا ال OS لايعرف اي Thread سوف يتم تحريره انطلاقا من ال المقبض او ال HANDLE
[FONT=Simplified Arabic Fixed]حاول مثلا عدم استعمال :
[FONT=Simplified Arabic Fixed]
[FONT=Simplified Arabic Fixed].
[FONT=Simplified Arabic Fixed]
[FONT=Simplified Arabic Fixed]انت انشئت ال Thread مع ال [FONT=Arial]initialization ولكن SUSPENDED ثم انشئته مرة اخرى و لكن في انتظار او Resuming .اذا كان يمكن القيام بكل هذه العمليم هكذا مثلا :
[FONT=Arial]
[FONT=Simplified Arabic Fixed]حاول مثلا عدم استعمال :
[FONT=Simplified Arabic Fixed]
كود :
[COLOR=#0000bb][COLOR=#0000bb]ExitProcess[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000bb]GetLastError[/COLOR][COLOR=#007700]);[/COLOR][COLOR=#ff8000]//Exit [/COLOR][/COLOR][FONT=Simplified Arabic Fixed]
[FONT=Simplified Arabic Fixed]انت انشئت ال Thread مع ال [FONT=Arial]initialization ولكن SUSPENDED ثم انشئته مرة اخرى و لكن في انتظار او Resuming .اذا كان يمكن القيام بكل هذه العمليم هكذا مثلا :
[FONT=Arial]
كود :
procedure TMainFrm.Button1Click(Sender: TObject);
begin
MyTh:=MyThread.Create(False);
//..
//do what ever
//..
//..
MyTh.resume;
end;
