كود ارسال اي عنصر(كائن)، لانشائه على الفورم بشكل الذي تريد
دلفي تعليم :: منتديات البرمجة :: دلفي
صفحة 1 من اصل 1
كود ارسال اي عنصر(كائن)، لانشائه على الفورم بشكل الذي تريد
كود ارسال اي عنصر(كائن)، لانشائه على الفورم بشكل الذي تريد
الاجراء للانشاء الكائن
حدث الانشاء الفورم
الاجراء للانشاء الكائن
- الكود:
uses StdCtrls;
type TControlClass = class of TControl;
procedure CreateCtrl(ctrl1: TControlClass; name: string;
l,t,h,w: Integer);
var Control1: TControl;
begin
Control1 := ctrl1.Create(Form1);
Control1.Parent := Form1;
Control1.Name := Name;
Control1.Left := l;
Control1.Top := t;
Control1.Height := h;
Control1.Width := w;
end;
- الكود:
procedure TForm1.FormCreate(Sender: TObject);
begin
CreateCtrl(TLabel,'Label1',20,25,30,40);
CreateCtrl(TEdit,'Edit1',40+20,20,30,80);
CreateCtrl(TButton,'Button1',30,25+25,25,80);
end;
djelal- مبرمج مجتهد
- عدد المساهمات : 157
تاريخ التسجيل : 29/04/2015
مواضيع مماثلة
» اضافة الكائنات الموجودة فوق الفورم أو العناصر، وتحديد كائن من قائمة كومبوبوكس
» انشاء عنصر TPanel وداخل هذا العنصر ننشيء عنصر TButton
» كتابة جملة أو كلمة على الفورم
» كيف ننشيء عنصر ActiveX من نوع pdf
» إضافة عنصر تحكم ActiveX
» انشاء عنصر TPanel وداخل هذا العنصر ننشيء عنصر TButton
» كتابة جملة أو كلمة على الفورم
» كيف ننشيء عنصر ActiveX من نوع pdf
» إضافة عنصر تحكم ActiveX
دلفي تعليم :: منتديات البرمجة :: دلفي
صفحة 1 من اصل 1
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى