pablo v?uez
14 de Julio del 2004

Necesito que cambie el ícono del Mouse en el evento Mousemove. Por lo demás, dónde están direccionados los archivos de ícono en Windows 2000.

Gracias..

[email protected]

sdemingo
14 de Julio del 2004

Hola,

esta es la lista de los distintos valores que puede tomar el puntero del ratón:

vbDefault 0 (Default) Shape determined by the object.
vbArrow 1 Arrow.
vbCrosshair 2 Cross (crosshair pointer).
vbIbeam 3 I beam.
vbIconPointer 4 Icon (small square within a square).
vbSizePointer 5 Size (four-pointed arrow pointing north, south, east, and west).
vbSizeNESW 6 Size NE SW (double arrow pointing northeast and southwest).
vbSizeNS 7 Size N S (double arrow pointing north and south).
vbSizeNWSE 8 Size NW SE (double arrow pointing northwest and southeast).
vbSizeWE 9 Size W E (double arrow pointing west and east).
vbUpArrow 10 Up Arrow.
vbHourglass 11 Hourglass (wait).
vbNoDrop 12 No Drop.
vbArrowHourglass 13 Arrow and hourglass.
vbArrowQuestion 14 Arrow and question mark.
vbSizeAll 15 Size all.
vbCustom 99 Custom icon specified by the MouseIcon property.


El ejemplo sería así:

Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)

Screen.MousePointer = 2

End Sub

salu2
sdemingo