Visual Basic 6 - AIUTO

Però, trasformare un thread (che, fra l'altro, ha un titolo evidentemente inutile ...) in una chat in cui si fanno tutte le domande che si vuole, non è affatto utile per un forum ...

GrG ... dove sei?

Ok adesso provo, con quel menu Fitizzio sono già riuscito a fare anche che se passo sopra le icone il testo diventa come su windows 3. cioè quando clicchi l'icona diventa tipo blue xD cmq adesso provero a vedere come fare grazie

Ok ce l'ho fatta ora sono riuscito a modificare il codice del menu correttamente Grazie ancora

Beh... proprio GrG

pierotofy.it/pages/extras/forum/6/1005842-megaupload_e_vb6/

in effetti adesso e uscito un problema io avevo messo questo codice in Mouse Move:

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


If Trascina Then
Screen.MousePointer = 5
Dim dx As Integer
dx = Image1(Index).Left - Label1(Index).Left
Image1(Index).Move Image1(Index).Left + (X - StartX), Image1(Index).Top + (Y - StartY)
Label1(Index).Left = Image1(Index).Left - dx
Label1(Index).Top = Image1(Index).Top + Image1(Index).Height + 100
End If

For t = 0 To Index - 1
Image1(t).MousePointer = 0
Next
Image1(Index).MousePointer = 99
For t = Index + 1 To 3
Image1(t).MousePointer = 0

Next


End Sub

E IN MOUSE UP:
Private Sub Image1_MouseUp(Index As Integer, Button As Integer, Shift As Integer, X As Single, Y As Single)
If Trascina Then
' Registri PosX e PosY della Picture1(index)
Screen.MousePointer = 99
End If
Trascina = False
Me.ZOrder 1
End Sub

ora il problema è che questo codice funziona ma solo sulla Image1(0) e sulle altre no

Scusami per il consiglio che ti ho dato in precedenza, ma per fare quello che vuoi tu è sufficiente o in fase di progettazione o al momento di caricare la form assegnare ai controlli Image il valore della proprietà MousePointer
Per esempio:

Image1(0).MousePointer=99

Ho provato piu volte a fare Image1(0).MousePointer=99
ma non funziona con il numero 99 mentre ad esempio con 5 e gli altri funziona, altrimenti è possibile caricare un file .CUR che ho io?

a volte anche io mi lascio prendere la mano

skynet1994: quest'ultimo problema del mousemove te lo lascio... ma per nuovi problemi apri nuovi thread