مكتبة (غير GUI) للمرافق الأساسية لـ Pascal (Delphi/Free Pascal/Lazarus).
class procedure dispatch_to_main_thread(const proc : TProcedure); overload;
class procedure dispatch_to_main_thread(const proc_method : TThreadMethod); overload;
يرسل تنفيذ طريقة أو استدعاء إجراء إلى قائمة انتظار الخيط الرئيسية.
class procedure ensure_in_main_thread(const proc : TProcedure); overload;
class procedure ensure_in_main_thread(const proc_method : TThreadMethod); overload;
يضمن تنفيذ طريقة أو استدعاء إجراء ضمن الموضوع الرئيسي. إذا كان مؤشر الترابط الحالي هو الخيط الرئيسي ، فسيتم تنفيذ الطريقة أو الإجراء مباشرة دون قائمة الانتظار.
procedure run(const proc : TProcedure; const after_ms : UInt64); overload;
procedure run(const proc_method : TThreadMethod; const after_ms : UInt64); overload;
ينفذ طريقة أو إجراء في الخيط الرئيسي بعد تأخير (ميلي ثانية).
procedure cancel(); overload;
procedure cancel(const proc : TProcedure); overload;
procedure cancel(const proc_method : TThreadMethod); overload;
يلغي تنفيذ طريقة/إجراء محدد أو جميع الطرق/الإجراءات في قائمة انتظار التأخير.
procedure begin_disable();
procedure end_disable();
لا يقبل مؤقتًا أي طلب تشغيل للتأخير بين begin_disable() و end_disable() .
constructor Create(const control : TControl); reintroduce;
تحدد معلمة المنشئ عنصر التحكم لأداء الرسوم المتحركة.
procedure add_size_animate(const w, h : Integer; const keep_center : Boolean; const duration : Cardinal);
procedure add_expand_to_left_animate(const w : Integer; const duration : Cardinal);
procedure add_move_animate(const x, y : Integer; const duration : Cardinal);
procedure add_change_animate(const x, y, w, h : Integer; const duration : Cardinal);
أضف تأثيرات الرسوم المتحركة لكل خطوة ، ودعم التغييرات في الحجم ، والتوسع إلى اليسار ، والحركة ، والتغييرات (في الحجم والموضع).
procedure run(); overload;
procedure run(const progress_callback : TncAnimateProgressEvent); overload;
ابدأ في تنفيذ الرسوم المتحركة.
procedure add_size_animate(const control : TControl; const w, h : Integer; const keep_center : Boolean; const duration : Cardinal);
procedure add_expand_to_left_animate(const control : TControl; const w : Integer; const duration : Cardinal);
procedure add_move_animate(const control : TControl; const x, y : Integer; const duration : Cardinal);
procedure add_change_animate(const control : TControl; const x, y, w, h : Integer; const duration : Cardinal);
أضف تأثيرات الرسوم المتحركة ، وتغيرات الدعم في الحجم ، والتوسع إلى اليسار ، والحركة ، والتغييرات (في الحجم والموضع).
procedure add_alpha_animate(const form : TForm; const a : Integer; const duration : Cardinal);
إضافة تأثير الرسوم المتحركة لتغيير قيمة ألفا النموذج.
procedure run(); overload;
procedure run(const progress_callback : TncAnimateProgressEvent); overload;
ابدأ في تنفيذ الرسوم المتحركة.