Visual Basic.NET - Controlar movimiento en tiempo real

 
Vista:
sin imagen de perfil
Val: 48
Ha mantenido su posición en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

Controlar movimiento en tiempo real

Publicado por pablo (33 intervenciones) el 12/09/2022 16:31:33
Buenos dias
Tengo el siguiente codigo, para poder mover botones en tiempo real. Funciona genial, el problema es que se mueve todo, no solo los botones, sino tambien los textbox y paneles que estan en el form.
Les consulto si sabrian como mejorar este codigo para que solo se pueda mover los botones cuando le hacen clik o los mantienen presionados.

desde ya muchas gracias.


Public Movimiento As Boolean
Public _x, _y As Integer



Private Sub grbBotones_MouseDown(sender As Object, e As System.Windows.Forms.MouseEventArgs) Handles grbBotones.MouseDown


_x = e.X
_y = e.Y
If e.Button = MouseButtons.Left Then
Movimiento = True
End If


End Sub

Private Sub grbBotones_MouseMove(sender As Object, e As System.Windows.Forms.MouseEventArgs) Handles grbBotones.MouseMove
If Movimiento Then
CType(sender, Control).Left = e.X +
CType(sender, Control).Left - _x
CType(sender, Control).Top = e.Y +
CType(sender, Control).Top - _y
End If
End Sub





Private Sub grbBotones_MouseUp(sender As Object, e As System.Windows.Forms.MouseEventArgs) Handles grbBotones.MouseUp
Movimiento = False
End Sub



Public Sub AsignarEventos(ByVal _Controles As Control)

Dim Controles As Control

For Each Controles In _Controles.Controls

AddHandler Controles.MouseDown, AddressOf grbBotones_MouseDown
AddHandler Controles.MouseMove, AddressOf grbBotones_MouseMove
AddHandler Controles.MouseUp, AddressOf grbBotones_MouseUp

AsignarEventos(Controles)
Next
End Sub
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Giancarlo
Val: 377
Bronce
Ha mantenido su posición en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

Controlar movimiento en tiempo real

Publicado por Giancarlo (488 intervenciones) el 13/09/2022 17:38:05
hola puedes revisar esto https://github.com/gquispeg/draw-form es un proyecto que deje de hacer, pero tiene algo de lo que buscas
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil
Val: 48
Ha mantenido su posición en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

Controlar movimiento en tiempo real

Publicado por Pablo (33 intervenciones) el 14/09/2022 14:04:05
Muchas gracias.
Fue de muchala ayuda,.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar