form quieto

20/12/2004 - 13:10 por fernando | Informe spam
Hola grupo, gracias antes que nada. Mi pregunta es la siguiente¿Hay alguna
forma de que un form no se pueda mover de su sitio?¿Alguna propiedad? Desde
ya muchas gracias

Fernando-Almería

Preguntas similare

Leer las respuestas

#1 Jorge Serrano [MVP VB]
20/12/2004 - 16:05 | Informe spam
Hola Fernando,

prueba el siguiente código:

Protected Overrides Sub WndProc(ByRef m As Message)
Const WM_NCLBUTTONDOWN As Int32 = &HA1
Const WM_SYSCOMMAND As Int32 = &H112
Const HTCAPTION As Int32 = &H2
Const SC_MOVE As Int32 = &HF010
If m.Msg = WM_SYSCOMMAND And m.WParam.ToInt32() = SC_MOVE OrElse m.Msg =
WM_NCLBUTTONDOWN And m.WParam.ToInt32() = HTCAPTION Then
Return
End If
MyBase.WndProc(m)
End Sub


Un saludo,

Jorge Serrano
MVP VB.NET


"fernando" wrote:

Hola grupo, gracias antes que nada. Mi pregunta es la siguiente¿Hay alguna
forma de que un form no se pueda mover de su sitio?¿Alguna propiedad? Desde
ya muchas gracias

Fernando-Almería



Respuesta Responder a este mensaje
#2 fernando
20/12/2004 - 16:37 | Informe spam
gracias jorge, excelente. Yo no veia la forma de dejarlo quieto, tambien
busque en el msdn y no encontre nada. Bueno una vez mas gracias

Fernando-Almería
"Jorge Serrano [MVP VB]"
escribió
en el mensaje news:
Hola Fernando,

prueba el siguiente código:

Protected Overrides Sub WndProc(ByRef m As Message)
Const WM_NCLBUTTONDOWN As Int32 = &HA1
Const WM_SYSCOMMAND As Int32 = &H112
Const HTCAPTION As Int32 = &H2
Const SC_MOVE As Int32 = &HF010
If m.Msg = WM_SYSCOMMAND And m.WParam.ToInt32() = SC_MOVE OrElse m.Msg
WM_NCLBUTTONDOWN And m.WParam.ToInt32() = HTCAPTION Then
Return
End If
MyBase.WndProc(m)
End Sub


Un saludo,

Jorge Serrano
MVP VB.NET


"fernando" wrote:

> Hola grupo, gracias antes que nada. Mi pregunta es la siguiente¿Hay


alguna
> forma de que un form no se pueda mover de su sitio?¿Alguna propiedad?


Desde
> ya muchas gracias
>
> Fernando-Almería
>
>
>
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida