EVITAR RESIZE MDIFORM COM O DUPLO CLICK
Bom dia a todos!
Como faço ou procedo para que o meu mdiForm fique estático mesmo com o pressionamento do Duplo Click do mouse sobre a barra de TÃtulo?
Explico:
Meu mdiForm esta configurado via property page desta forma
ControlBox = True
MaximezeBox = False
MinimizeBox = False
WindowState = Maximized
Estou utilizando via código o seguinte:
Imports System
Imports System.Data.OleDb
Imports System.Drawing
Imports System.Drawing.Drawing2D
Imports System.Drawing.Text
Imports System.IO
Imports System.Math
Imports System.Runtime.InteropServices
Imports System.Windows.Forms
Public Class mdiPrincipal
Dim lngHMenu As Long
Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)
If (m.Msg = WM_SYSCOMMAND AndAlso m.WParam.ToInt32() = SC_MOVE) OrElse (m.Msg = WM_NCLBUTTONDOWN AndAlso m.WParam.ToInt32() = HTCAPTION) Then
Return
Else
MyBase.WndProc(m)
End If
End Sub
Protected Overrides ReadOnly Property CreateParams() As CreateParams
Get
Dim cp As CreateParams = MyBase.CreateParams
Const CS_DBLCLKS As Int32 = &H8
Const CS_NOCLOSE As Int32 = &H200
cp.ClassStyle = CS_DBLCLKS Or CS_NOCLOSE
Return cp
End Get
End Property
Sendo que o 1º Protect é para evitar a movimentação do mesmo e o 2º é para desabilitar o Botão (X) ou seja o usuário só sai da aplicação via menu [Fechar] e confirmando sua saida.
Porém se der um duplo click na barra de TÃtulo o mesmo se redimensiona ao tamanho de desenvolvimento e não retorna mais ao tamanho Tela Inteira.
Como evitar que isto aconteça ou como resolver tal problema? Alguem pode por um acaso ajudar-me?
Obrigado
Como faço ou procedo para que o meu mdiForm fique estático mesmo com o pressionamento do Duplo Click do mouse sobre a barra de TÃtulo?
Explico:
Meu mdiForm esta configurado via property page desta forma
ControlBox = True
MaximezeBox = False
MinimizeBox = False
WindowState = Maximized
Estou utilizando via código o seguinte:
Imports System
Imports System.Data.OleDb
Imports System.Drawing
Imports System.Drawing.Drawing2D
Imports System.Drawing.Text
Imports System.IO
Imports System.Math
Imports System.Runtime.InteropServices
Imports System.Windows.Forms
Public Class mdiPrincipal
Dim lngHMenu As Long
Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)
If (m.Msg = WM_SYSCOMMAND AndAlso m.WParam.ToInt32() = SC_MOVE) OrElse (m.Msg = WM_NCLBUTTONDOWN AndAlso m.WParam.ToInt32() = HTCAPTION) Then
Return
Else
MyBase.WndProc(m)
End If
End Sub
Protected Overrides ReadOnly Property CreateParams() As CreateParams
Get
Dim cp As CreateParams = MyBase.CreateParams
Const CS_DBLCLKS As Int32 = &H8
Const CS_NOCLOSE As Int32 = &H200
cp.ClassStyle = CS_DBLCLKS Or CS_NOCLOSE
Return cp
End Get
End Property
Sendo que o 1º Protect é para evitar a movimentação do mesmo e o 2º é para desabilitar o Botão (X) ou seja o usuário só sai da aplicação via menu [Fechar] e confirmando sua saida.
Porém se der um duplo click na barra de TÃtulo o mesmo se redimensiona ao tamanho de desenvolvimento e não retorna mais ao tamanho Tela Inteira.
Como evitar que isto aconteça ou como resolver tal problema? Alguem pode por um acaso ajudar-me?
Obrigado
coloque no evento resize do form , acho que isso resolve!
WindowState = Maximized
WindowState = Maximized
Luiz, funcionou obrigado!
O comando completo é:
Private Sub mdiPrincipal_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Resize
Me.WindowState = FormWindowState.Maximized
End Sub
Até, qualquer coisa estaremos aqui!
O comando completo é:
Private Sub mdiPrincipal_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Resize
Me.WindowState = FormWindowState.Maximized
End Sub
Até, qualquer coisa estaremos aqui!
Tópico encerrado , respostas não são mais permitidas