[VB]...icona mouse

[teto]

ki sa come cambiare l'icona del muose?
cioè,in esecuzione normale 1 icona,qando appare un msgbox Exclamation un'altra..ecc..



e grazie

[sebamix]

Oggetto Screen, property MousePointer
Se vuoi mettere un cursore personalizzato setti MousePointer a vbCustom e carichi nella property MouseIcon l'immagine.

screen.mousepointer=vbhourglass
msgbox "pippo"
screen.mouseicon=loadpicture(...)
'o
set screen.mouseicon=image1.picture
screen.mousepointer=vbcustom
msgbox "pluto"
screen.mousepointer=vbdefault

[sebamix]

Ah, il discorso vale per tutti i controlli (es. bottoni, label, form, ...)

[ddies]

Giusto, ma questa cosa non funziona solo con winNT e Win2k?

[sebamix]

screen.mousepointer=vbhourglass

Ti assicuro che funziona con Win95/98/ME/2K (l'ho provata )
Il resto credo funzioni comunque.

[teto]

ma può essere 1 immagine qalsiasi o deve essere x forza 1'icona?
e poi l'indirizzo ke inserisco, come devo inserirlo, fra "..."? fammi 1 esempio se puoi

[chipdb]

Deve essere un'icona (*.ico) o preferibilmente un cursore (*.cur).
Il percorso dell'icona o del cursore deve essere tra doppi apici

screen.mouseicon=loadpicture("percorso\cursore.cur")
screen.mousepointer=vbcustom

Ciao