مساعدة في تمرير بارامتر للثريد

هدا الموقع يظهر أفضل في المتصفحات الحديثة مع جافاسكريبت مفعلة.

مساعدة في تمرير بارامتر للثريد

DjemouiBenkhalifa

السلام عليكم ورحمة الله تعالى وبركاته
أردت عمل إجراء AnonymousThread
وأردت تمرير له procedure
لكن لم أعرف نوع البارامتر الصحيح لتمرير الإجراء فيه

Proc:??????

procedure TFrmMain.ExportThread(Proc:??????);
begin
    try
     TThread.CreateAnonymousThread(
       procedure
       begin
         Proc;
       end).Start;
    except on E: Exception do
    end;
end;

brave

procedure TFrmMain.ExportThread(Proc:TProc);
begin
    try
     TThread.CreateAnonymousThread(
       procedure
       begin
         Proc;
       end).Start;
    except on E: Exception do
    end;
end;

رابط تحميل المثال الأصلي للموضوع من هنا

SamerAssil

هذا هو شكل الامر System.Classes.TThread.CreateAnonymousThread (من موقع امباركاديرو الرسمي)

http://docwiki.embarcadero.com/Libraries/Sydney/en/System.Classes.TThread.CreateAnonymousThread

class function CreateAnonymousThread(const ThreadProc: TProc): TThread; static;

نوع البرمتر هو TProc .

ومن هنا http://docwiki.embarcadero.com/Libraries/Sydney/en/System.SysUtils.TProc
ستجد النوع TProc هو

TProc = reference to procedure;

هو Procedure بدون برمترات

لم تختلف اجابتي على الاجابات الاخرى . فقط كان هدفي توضيح كيفية الحصول على اشكال الاوامر وانواع برمتراتها.

الاجابة المختصرة هي : TProc