انشاء مكونات جديدة

بسم الله الرحمن الرحيم

هذا الموضوع استكمال لما قام به الأخ امناينلواد

لقد قسمت الموضوع إلى ثلاث أجزاء

وكما بدا

من File-->New --> Other

تظهر هذه النافذة نقوم باختيار Paquet ثم نضغط على OK

بعد ذلك تظهر نافذة أخرى بهذا الشكل

نختار Add

لتظهر نافذة Add

بها ثلاث تبويبات نختار التبويب New component

او بطريقة اخرى من القائمة

NewComponent --> Component

• اختيار المكون الذي سيرث منه مكوننا الجديد
  
• اختيار اسم للمكون شرط أن يبدأ بحرف 'T'
  
• اختيار صفحة المكونات التي ستحوي المكون
  
• المسار الموجود به المكون الأصلي أي الأب
  
• المسار الذي سيتواجد به المكون الجديد وهو الابن
  

لتظهر الوحدة Unit

unit Qarabteam;

interface

uses
  SysUtils, Classes, QControls, QStdCtrls;

type
  Tarabteam = class(TCustomEdit)
  private
	{ Déclarations privées }
  protected
	{ Déclarations protégées }
  public
	{ Déclarations publiques }
  published
	{ Déclarations publiées }
  end;

procedure Register;

implementation

procedure Register;
begin
  RegisterComponents('Standard', [Tarabteam]);
end;

end.

- يظهر في القسم Type

اسم المكون الذي ستقوم بإنشائه ومن أي class هو مشتق

- أما في القسم Protected يتم فيه تعريف المتغيرات والخصائص والتوابع والتي يتم الوصول إليها من

قبل الوحدة أو الوحدات المورثة منها

- القسم Public يتم فيه التعريف بالخصائص

- القسم Published يتم فيه تعريف الخصائص التي تظهر في محرر الخواص فيما بعد

- القسم Procedure Register يتم منه استدعاء الإجراء من السجل المكتوب بدخله

وهو سجل المكونات ثم الصفحة المحددة وصولا إلى المكون الذي سننشئه

اعتذر لان نسخة دلفي فرنسية ولا املك نسخة انجليزية

تحياتي