المشاركات : 152
المواضيع 93
:
: 26
الإنتساب : Oct 2015
السلام عليكم
كيف اضيف اسم وعنوان لنماذج انشأتها وقت التنفيذ
اي
(tform2.create(self
تظهر الفورم الثاني مع ترقيم تلقائي
form_1
form_2
Form_3
الخ
المشاركات : 476
المواضيع 0
:
: 217
الإنتساب : Apr 2011
سلام عليكم
كود :
var
F2:TForm;
begin
F2:=Tform.Create(Self);
with f2 do
begin
Parent := self;
//Height := 100;
//Width := 400;
align:=alclient;
caption:='welcome to Myform_01';
color:=clred;
// properties like form..
show;
end;
end;
الفاشلون نوعان : الأول : فكر ولم يفعل .. والآخر: فعل ولم يفكر
![[-]](https://delphi4arab.net/forum/D4A2020/collapse.png)
كل من 1 user says قال شكرا ل Mr.DOS على المشاركة المفيدة1 user says Thank You to Mr.DOS for this post
• h-farid
المشاركات : 152
المواضيع 93
:
: 26
الإنتساب : Oct 2015
شكرا لك لقد نجح الامر لكن تبقى مشكللة الترتيب align:=alleft
فالنماذج تظهر هكذا
list4,list3,list2,list1
بدل
list1,list2,list3
