[viv]

وعليكم السلام ورحمة الله

اخ سندباد تعلن عن متغير يشير للنموذج

كود :

var
frm2:Tform2;

وبعدها تقوم بانشاء النموذج في الحدث النقر على الزر

كود :

frm2:=Tform2.Create(nil);
frm2.Show

حيث المتغير يشير الى الوحدة فالنموذج اسمه Form2 واسم الوحدة الخاصة به TForm2 
الان كلما نقرت على الزر ظهر نموذج جديد
لاتنسى قتل النموذج في الحدث OnClose

كود :

Self.free;

بالتوفيق للجميع

---

يمكنك ايضا مطالعة الامثلة التي مع دلفي
من القائمة  file تم New تم اختر Other

من النافذة التي ستظهر أختر DelphiProjects ستجد مشاريع جاهزة MDI Application او SDI Application
جربهم فيهم ما تطلب ايضا