[Gambas-user] Drag Icon

[novae_lithic]

Hi,

I can't understand why my drag icon is not changing with the following
code...

Public Sub TilesGroup_MouseDrag()

  If Mouse.Left Then
    Last.Drag(Last.Tag)
    Drag.Icon = Picture["icon:/32/add"]
  End If

End

where TileGroup is a group of Buttons in an array:

 Tiles[i, j] = New Button(Me) As "TilesGroup"

* On a broader level, where can I find examples or more detailed information
about how to use the Drag and Drop functionality? The wiki
(http://gambaswiki.org/wiki/comp/gb.qt4/drag) is quite sparse and has no
examples.



--
View this message in context: http://gambas.8142.n7.nabble.com/Drag-Icon-tp58574.html
Sent from the gambas-user mailing list archive at Nabble.com.