فرم mdi و فرزند

[nokhodi]

چطوری میتونم حالت max رو از پنجره ی mdi بگیرم؟؟؟

و فرم های فرزند رو چطوری میتونم ثابت نگه شون دارم؟؟؟

[adib202]

خود فرم mdi رو توي notepad باز كن و پايين linktopic اين خط رو اضافه كن: MaxButton = 0 'False
بعد فرو رو save كن

[nokhodi]

خطا میده...

[adib202]

چه خطايي؟من همين كارو كردم جواب داده

[nokhodi]

Line 10: The property name MaxButton in Mainfrm is invalid.

توی فایل لوگش نوشته بود..وقتی هم برنامه رو باز میکنم خطا میده؟؟!!

[nokhodi]

دوستان پیشنهاد دیگه ی ندارن؟؟؟!!!!!

[M.T.P]

برای غیر فعال کردن max button فرم mdi :


Option Explicit

'Inside MDIForm
Private Declare Function GetSystemMenu Lib "user32" (ByVal hWnd As Long, ByVal bRevert As Long) As Long
Private Declare Function DeleteMenu Lib "user32" (ByVal hMenu As Long, ByVal nPosition As Long, ByVal wFlags As Long) As Long
Private Declare Function DrawMenuBar Lib "user32" (ByVal hWnd As Long) As Long
Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long) As Long
Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long

Private Const MF_BYCOMMAND = &H0
Private Const SC_MAXIMIZE As Long = &HF030&

Private Const GWL_STYLE& = (-16)
Private Const WS_MAXIMIZEBOX As Long = &H10000

'================================================= ================
Private Sub MDIForm_Load()

DisableMaxButton

End Sub

'================================================= ================
Public Sub DisableMaxButton()

'This sub Removes Maximize button from control box and system menu.
Dim hMenu As Long
Dim OldStyle As Long

'Remove Max button
OldStyle = GetWindowLong(Me.hWnd, GWL_STYLE)
SetWindowLong Me.hWnd, GWL_STYLE, OldStyle And (Not WS_MAXIMIZEBOX)

'Remove from system menu
hMenu = GetSystemMenu(Me.hWnd, 0&)

If hMenu Then
Call DeleteMenu(hMenu, SC_MAXIMIZE, MF_BYCOMMAND)
Call DrawMenuBar(Me.hWnd)

End If

End Sub

[nokhodi]

سپاس...:لبخندساده:

[nokhodi]

الان کلید max فرم mdi از کار افتاده...
اما اگه رو همون نوار عنوان دابل کلیک بشه باز پنجره تغییر حالت میده و کوچیک میشه..
این حالت برا فرم هلی معمولی هم اتفاق میوفته...


این مشکل رو چطوری میشه حل کرد؟

[IamOverlord]

خاصیت MinButton رو هم می تونی False کنی.

[nokhodi]

اون false...الان مشکل من چیزه دیگه ای...

[IamOverlord]

من امتحان کردم هیچ اتفاقی روی Titlebar نمی افته، مگر روی Icon دوبار کلیک کنی، که در این صورت پنچره بسته می شه.

[Restlesa]

دوستان من هم یه مشکل با فرم های فرزند و مادر دارم
می خوام دکمه های Minimize و Masimaiz فرم فرزندم رو غیر فعال کنم
این کار رو بدم هیچ مشکلی با False کردن مقدارهاشون در پنجره مشخصات انجام دادم اما یه مشکلی برام به وجود میاد و اونم اینه که موقع اجرای برنامه ام فرم مادر لود میشه اما فرم فرزند نه
مشکل از کجاست و چه طوری می تونم بر طرفش کنم ؟؟؟

[nokhodi]

من امتحان کردم هیچ اتفاقی روی Titlebar نمی افته، مگر روی Icon دوبار کلیک کنی، که در این صورت پنچره بسته می شه.

چرا...برای من وقتی کلیک میشه...از حالت max در میاد...اما بسته نمیشه!!!!

[IamOverlord]

چرا...برای من وقتی کلیک میشه...از حالت max در میاد...اما بسته نمیشه!!!!

:متعجب:!
می تونی کدتو بزاری؟

[محسن واژدی]

دوستان من هم یه مشکل با فرم های فرزند و مادر دارم
می خوام دکمه های Minimize و Masimaiz فرم فرزندم رو غیر فعال کنم
این کار رو بدم هیچ مشکلی با False کردن مقدارهاشون در پنجره مشخصات انجام دادم اما یه مشکلی برام به وجود میاد و اونم اینه که موقع اجرای برنامه ام فرم مادر لود میشه اما فرم فرزند نه
مشکل از کجاست و چه طوری می تونم بر طرفش کنم ؟؟؟

برای فرم child دکمه های Minimize و Maximize حتما بایستی فعال باشند (یکی از شروط نمایش فرم child فعال بودن این دو دکمه است)، که اگر در زمان طراحی یکی از این دو یا هردو را غیرفعال کنیم فرم child نمایش داده نمیشود
البته امکان غیرفعال کردن این دو دکمه در run-time وجود دارد اما این روش در فرم های child تاثیری ندارد (همچنان دکمه های min و maximize فعال خواهند بود)

موفق باشید

[night_secret]

بعد از اینکار اون قبلیها غیر فعال میشن یا میمونن؟؟؟

[nokhodi]

:متعجب:!
می تونی کدتو بزاری؟

کد تو صفحه ی قبل هست...