Barra improvisada

21/08/2004 - 05:57 por Novato.NET | Informe spam
Hola como puedo hacer que mi winform se pueda mover pues
la barra de titulo o control box esta deshabilitado es
decir false y e improvisado una barra mas agradable al
usuario que cumple casi todas las funciones menos claro
mover el formulario al hacerle clic y mantenerlo sostenido.
 

Leer las respuestas

#1 Eduardo A. Morcillo [MS MVP VB]
21/08/2004 - 08:19 | Informe spam
Novato.NET wrote:
Hola como puedo hacer que mi winform se pueda mover pues
la barra de titulo o control box esta deshabilitado es
decir false y e improvisado una barra mas agradable al
usuario que cumple casi todas las funciones menos claro
mover el formulario al hacerle clic y mantenerlo sostenido.



Agrega estas declaraciones:

Private Declare Auto Function ReleaseCapture Lib "user32" () As Boolean

Private Declare Auto Function SendMessage Lib "user32" ( _
ByVal hWnd As IntPtr, ByVal msg As Integer, _
ByVal wParam As Integer, ByVal lParam As Integer) As Integer

Y este codigo en el MouseDown de la barra (donde hWnd es el valor de la
propiedad Handle del formulario):

Const WM_NCLBUTTONDOWN As Integer = &HA1
Const HTCAPTION As Integer = 2

ReleaseCapture()
SendMessage(hWnd, WM_NCLBUTTONDOWN, HTCAPTION, 0)

Eduardo A. Morcillo [MS MVP VB]
http://www.mvps.org/emorcillo

Preguntas similares