[Gambas-user] R: "Strange" coordinates of mouse with _Drop() event

Benoît Minisini gambas at ...1...
Mon Oct 21 23:59:23 CEST 2013


Le 21/10/2013 09:17, Ru Vuott a écrit :
> Hello,
>
> I would like to draw attention to my message, highlighting the strange coordinates returned by the mouse with the event _Drop ().
>
> Is it normal or there is a bug.
>
> Thanks
> vuott
>
>
>
> --------------------------------------------
> Dom 20/10/13, Ru Vuott <vuott at ...325...> ha scritto:
>
>   Oggetto: [Gambas-user] "Strange" coordinates of mouse with _Drop() event
>   A: gambas-user at lists.sourceforge.net
>   Cc: gambas at ...1...
>   Data: Domenica 20 ottobre 2013, 00:22
>
>   Hello,
>
>   on a Form I have a "ScrollView" and separately a
>   "PictureBox", in which there is the image I'll drag then
>   with the mouse inside the "ScrollView".
>
>   Here the code:
>   **************************************
>   Public Sub Form_Open()
>
>      ScrollView1.Drop = True
>
>   End
>
>
>   Public Sub PictureBox1_MouseDrag()
>
>      If Mouse.Left Then
>        Drag.Icon = Last.Picture
>
>        Last.Drag(Last.Picture.Image)
>
>      Endif
>
>   End
>
>
>   Public Sub ScrollView1_Drop()
>
>    Dim pb As PictureBox
>    Dim pc As Picture
>
>      With pb = New
>   PictureBox(ScrollView1)
>        .X = Mouse.X
>        .Y = Mouse.Y
>        .Picture = Drag.Data.Picture
>
>        .W = Drag.Data.Picture.W
>        .H = Drag.Data.Picture.H
>      End With
>
>
>   ' In console I read the "very strange" coordinates of mouse
>   pointer:
>      With Mouse
>        Print .X
>        Print .Y
>      End With
>
>   End
>   **************************************
>
>   Where I'm wrong?
>
>
>
>   Best regards
>   vuottttt
>

Please provide a project that reproduces the bug.

Regards,

-- 
Benoît Minisini




More information about the User mailing list