minimaiz & panel

[aminvb]

سلام

من ه جای نوتر بالای فرم میخوام خودم دگمه close va minimaiz بزارم و یک پنل هم به عنوان نوار

اما برای حرکت دادنه فرم با پنل و همچنین کد دگمه minimaize رو بلد نیستم لطفا دوستان یاری کنند

تشکر فراوان

[Saman_12]

برای حرکنت دادن فرمی که بورداستیلش None هست و جای اون از یه پنل استفاده کردی می تونی از کد زیر استفاده کنی :
اول این ها رو زیر کلاس تعریف کن :


Private _IsMouseDown As Boolean = False
Private _MouseFirstPosition As System.Drawing.Point

این ها هم به ترتیب توی رویداد های MouseDown و MouseMove و MouseUp پنل :


If e.Button = System.Windows.Forms.MouseButtons.Left Then
Me._IsMouseDown = True
Me._MouseFirstPosition = e.Location
End If
If Top < 3 Then
WindowState = FormWindowState.Maximized
Else
WindowState = FormWindowState.Normal
End If




If Me._IsMouseDown Then
Me.Location = New Point( _
Me.Location.X + e.X - Me._MouseFirstPosition.X, _
Me.Location.Y + e.Y - Me._MouseFirstPosition.Y)
End If



Me._IsMouseDown = False
برای مینی مایز و غیره هم از استیل ها موجود در پروپرتی WindowState توی باتون های روی پنل استفاده کن (حالا اگه باتون نداشتی هر چیزی که بود.)

[aminvb]

تشکر فراوانننننننننننننننننننن نننننننن:لبخندساده::لبخندس� �ده::لبخندساده::لبخندساده:

[aminvb]

برای مینی مایز و غیره هم از استیل ها موجود در پروپرتی WindowState توی باتون های روی پنل استفاده کن (حالا اگه باتون نداشتی هر چیزی که بود.)

میشه آدرس دقیق تر بدی نمی دونم کجاست:خجالت:

[Saman_12]

توی کدی که برای MouseDown گذاشتم دقت کن.
تون خطی که نوشته :

If Top < 3 Then
از این خط تا آخر کد این رویداد یک مثال برای همین کاره و ربطی به پنل نداره.(اون کد می گه هر وقت Top پنل از 3 کمتر شد برنامه به صورت Maximize در بیاد.)

[aminvb]

دوسته عزیز موفق نشدم میشه یک نمونه برنامه بذاری یک دگمه فرمو مینی مایز کنه

[Saman_12]

اینم سورس فقط یک خط هست :

[aminvb]

آقا ممنون :خجالت:

از این که کارمو راه انداختی