[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