PDA

View Full Version : مشکل در فرم mdi و mdichild



vb341
یک شنبه 20 شهریور 1384, 16:59 عصر
سلام دوستان
من تو برنامه از یک فرم mdi اصلی و چند تا فرم mdichild استفاده کردم . مشکل اینجاست که هر بار که هر کدوم از فرم های child رو اجرا میکنم مکان اونها نسبت به جای قبلی تغییر میکنه و پس از چند بار اجرا دوباره به جای اول بر میگرده .
می خواستم ببینم که میشه فرمهای child رو جوری تنظیم کرد که همیشه در وسط و یا قسمت خاصی نمایش داده بشه و اگر فرم child ما بسته شد و باز شد جای اون تغییری نکنه
نمونه برنامه رو هم گذاشتم

mRizvandi
یک شنبه 20 شهریور 1384, 17:54 عصر
سلام

کافیه شما برای هر فرم یک روال این تیپی تعریف کنی


Private Sub ShowDialog(Optional bModalOption As Integer = False)
Me.Top = ... ' Center or constant value
Me.Left = ... ' Center or constant value
Me.Show Iif(bModalOption, 1, 0)
End Sub
یا

Private Sub ShowDialog(Optional bModalOption As Integer = False, Optional bCebter As Boolean = True)
بعد به جای صدا زدن فرمها بصورت معمولی این کار رو بکن:

FrmFormname.ShowDialog True
:چشمک:

vb341
یک شنبه 20 شهریور 1384, 21:42 عصر
دوست عزیز از توجه شما ممنون . میشه لطف کنید تو مثالی که گذاشتم نحوه انکار رو بگین ؟
چون من هرکار کردم با توضیحات شما نتونستم مشکلم رو حل کنم

ehsan_ansaripoor
یک شنبه 20 شهریور 1384, 23:34 عصر
دوست عزیز به نظر من داخل پنجره Property گزینه نوع Windowstartup را برابر Manuel کن و بعد Top و Left را به اندازه دلخواه تعیین کن

vbapr2005
دوشنبه 21 شهریور 1384, 04:51 صبح
بخشید مگه ChildForm_Load جای بدیه برای این کار؟
خب، تو همون جا Left و Top فرمهای فرزند رو تعیین کن دیگه.

vb341
دوشنبه 21 شهریور 1384, 14:12 عصر
دوستان خیلی ممنون