Visual Basic - Deshabilitar el click del mouse

Life is soft - evento anual de software empresarial
 
Vista:

Deshabilitar el click del mouse

Publicado por Bella Panamá (80 intervenciones) el 31/07/2001 05:56:38
Tengo un programa en el que hay procesos un poco largos y lo que quiero es tener el boton animado o con la forma de reloj mientras se hacen estos procesos pero tambien quiero que el usuario no pueda hacer click en ninguma parte de la ventana.
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

RE:Deshabilitar el click del mouse

Publicado por Agustin (49 intervenciones) el 31/07/2001 07:34:05
Tal vez te sirva.
para que se ponga el mouse con la flech pone esto, lo cual lo podes cambiar por un timer para que dure el proceso de carga.
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
MousePointer = 11
End Sub
Para que no se pueda clickear en ningun lado puedes poner la opcion Enable del form en false
osea : form1.Enable = false.
Y luego poner enable en true cuando se termine de cargar todos los procesos.
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

RE: Formas del Mouse

Publicado por Silvina de Argentina (21 intervenciones) el 31/07/2001 14:17:21
Lo unico que tienes que hacer es colocar
Mousepointer = ( aca estan todos los valores, tenes que poner el numero que vos queres segun la forma)

vbDefault 0 (Predeterminado) vbArrow 1 Flecha.
vbCrosshair 2 Cruz (puntero en forma de cruz).
vbIbeam 3 Forma de I.
vbIconPointer 4 Icono (pequeño cuadrado dentro de otro cuadrado).
vbSizePointer 5 Tamaño (flecha de cuatro puntas: norte, sur, este y oeste).
vbSizeNESW 6 Tamaño NE SO (flecha doble que apunta al nordeste y al sudoeste).
vbSizeNS 7 Tamaño N S (flecha doble que apunta al norte y al sur).
vbSizeNWSE 8 Tamaño NO SE (flecha doble que apunta al noroeste y al sudeste).
vbSizeWE 9 Tamaño O E (flecha doble que apunta al oeste y al este).
vbUpArrow 10 Flecha hacia arriba.
vbHourglass 11 Reloj de arena (espera).
vbNoDrop 12 No colocar.
vbArrowHourglass 13 Flecha y reloj de arena.
vbArrowQuestion 14 Flecha y signo de interrogación.
vbSizeAll 15 Ajustar todo.

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