PDA

View Full Version : طریقه تعریف فرم های متعدد Child



rmb_ali
شنبه 04 اسفند 1386, 09:47 صبح
من میخوام این امکان رو برای کاربر بوجود بیارم که بتونه از یه نوع فرم چندین فرم تولید کنه که این فرم من دارای event های مختلفی هست و چند تا تایمر و کامپوننت های دیگری هم داره بنابراین من یه فرم درست کردم و تمام کامپوننت ها رو روی اون قرار دادم و تمام کدهایی که نیاز بود رو نوشتم حالاا هر وقت که کاربر کلید ایجاد فرم رو میزنه من دستورات زیر رو اجرا میکنم


CreatForm:=Tproduction.Create(self);
CreatForm.FormStyle:=fsMDIChild;
CreatForm.OnClose:=Close;
CreatForm.label4.caption:=IntToStr(vProduct);
CreatForm.Name:='P'+IntToStr(vProduct);
CreatForm.Caption:=edit1.Text;
CreatForm.BiDiMode:=bdRightToLeft;
CreatForm.Font.Name:='tahoma';
CreatForm.Show;

که اسم فرمم production هست
حالا مشکل من اینه که :
اولا این راهی که من رفتم کلا درسته یا نه؟
دوم آیا فرم های ایجاد شده و کامپوننت های آنها ماهیت مستقل دارند یا نه؟

Vahid_moghaddam
شنبه 04 اسفند 1386, 13:07 عصر
فرم شما دارای کلاسی هست مثل TUserForm. متغیرهایی از این نوع تعریف کنید و هر کدوم رو creaste کنید. مستقل از هم خواهند بود.
در همین شکلی هم که نوشتین، مستقل از هم هستن.