PDA

View Full Version : انداختن فرم در پنل



yavari
شنبه 17 شهریور 1386, 09:19 صبح
سلام

یکی از فرمهای برنامم به این صورته که آیتم مورد نظر از منوی کنار صفحه انتخاب میشه و فرم مربوط به اون تو پنل وسط صفحه نمایش داده میشه
ضمن نمایش فرم جدید میخوام فرم دیگه ای داخل پنل باز نمونه ، برا همین همه فرمها رو یه جا می بندم بعد از فرم مد نظرم یه New می سازم .


Dim form1 As New frm1
form1.MdiParent = Me
closeAllForm()
Panel2.Controls.Add(form1)
form1.Show()

اما جواب نمیده ! :افسرده:
ممنون میشم بگید کجای کارم می لنگه !

با احترام

Alireza_Salehi
شنبه 17 شهریور 1386, 09:53 صبح
داخل اون تابع closeallform مشخص نکردی چه خبره! غیر از این تابع که معلوم نیست چی کار میکنه کدتون اشکالی نداره !

touraj
شنبه 17 شهریور 1386, 10:40 صبح
خب تو اون تابع چی باید نوشت؟

yavari
شنبه 17 شهریور 1386, 10:54 صبح
سلام

اون تابع چیز خاصی نیست . فقط داخلش تمام فرمهام رو بستم ، همین !

frmReceive.Close()
frmInvitition.Close()
frmPetitionDetail.Close()
.
.
.

touraj
شنبه 17 شهریور 1386, 10:58 صبح
آهان. دستت درد نکنه.

حامد مصافی
شنبه 17 شهریور 1386, 13:41 عصر
فرم مورد نظر رو مستقیماً به فرم والد اضافه کنید، نه به پنل.

پویا
شنبه 17 شهریور 1386, 14:01 عصر
از Me.MdiChildren استفاده کنین
لیست فرم های باز داخلش هستند
می تونین دونه دونه بندیدشون

touraj
شنبه 17 شهریور 1386, 14:06 عصر
از Me.MdiChildren استفاده کنین
لیست فرم های باز داخلش هستند
می تونین دونه دونه بندیدشون

خب تقریباً همین کار رو انجام داده. فرمها رو یکی یکی بسته. اما جواب نداده.

saeed_rezaei
شنبه 17 شهریور 1386, 14:41 عصر
خب تقریباً همین کار رو انجام داده. فرمها رو یکی یکی بسته. اما جواب نداده.

خوب این کد رو نگاه کنید:



dim m as new form2

m.show
m= new form2
m.show


حالا دستور زیر کدوم فرم رو می بنده؟


m.close

?????

yavari
شنبه 17 شهریور 1386, 18:48 عصر
سلام

متاسفانه مشکل من همچنان در جای خود باقیه !
ممنون میشم دوستان یه سمپل بذارن .

با تشکر

Alireza_Salehi
شنبه 17 شهریور 1386, 20:44 عصر
این هم یک مثال ساده!