چه جوری میشه : فرم روی صفحه فقل بشه!؟

[mialdf]

سلام دوستان

می خواستم بدونم چه جوری میتونم یه فرم رو روی صفحه قفل کنم مثلاً با باز شدن یه پنجره دیگه این فرم روش باشه یعنی اجازه نده که پنجره دیگری روش باز بشه
امیدوارم منظورمو فهمیده باشید
با تشکر

[javadt]

در قسمت لود و آن لود فرمت بنویس این کار می شه
موقع لود شدن فرم غیر فعال می شه و موقع بسته شدن فعال می شه

Private Sub Form_Load()
MDIForm1.Enabled = False
End Sub


Private Sub Form_Unload(Cancel As Integer)
MDIForm1.Enabled = True
End Sub

[M_P_1374]

Public Declare Sub SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long)

Public Const HWND_TOPMOST = -1
Public Const HWND_NOTOPMOST = -2
Public Const SWP_NOSIZE = &H1
Public Const SWP_NOMOVE = &H2
Public Const SWP_NOACTIVATE = &H10
Public Const SWP_SHOWWINDOW = &H40

Public Sub SetAlwaysOnTop(Form As Form, ByVal SetTopMost As Boolean)
If SetTopMost = True Then
SetWindowPos Form.hwnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOACTIVATE Or SWP_SHOWWINDOW Or SWP_NOMOVE Or SWP_NOSIZE
Else
SetWindowPos Form.hwnd, HWND_NOTOPMOST, 0, 0, 0, 0, SWP_NOACTIVATE Or SWP_SHOWWINDOW Or SWP_NOMOVE Or SWP_NOSIZE
End If
End Sub


اینو بذارین تو یه ماژول بعد توی فرمتون SetAlwaysOnTop بعد اسم فرم بعد هم بنویسین True
حله؟

[alih110]

دوست عزیز سرچ میکردی مطلب بود .

در هر صورت اینم سورسی که میخواستی .

[hossein033]

سلام دوستان

می خواستم بدونم چه جوری میتونم یه فرم رو روی صفحه قفل کنم مثلاً با باز شدن یه پنجره دیگه این فرم روش باشه یعنی اجازه نده که پنجره دیگری روش باز بشه
امیدوارم منظورمو فهمیده باشید
با تشکر
البته من فکر می کنم که دوست عزیزمون منظورش این بوده که کاربر نتونه فرم رو تکان بده که شما می تونید به راحتی Moveable = False تا فرم شما قفل بشه:چشمک: