[Gambas-user] Sudden loss of mouse data

[Charlie Ogier]

Hi,

Can you run the following code in a GUI application. Click on the 
GridView. Since the upgrade to Gambas 3.15.1 I have lost the mouse data 
and an error is created. Is it just me?

Thanks,

Charlie Ogier

' Gambas class file

'' I have tried gb.gui, gb.gtk3, gb.gui.qt & gb.qt5 The results are the same
'' This started on the arrival of Gambas 3.15.1
'' 05/08/20

GridView1 As Gridview

Public Sub Form_Open()

   Dim iLoop As Integer
   Dim sDir As String[] = Dir(User.Home)

   With Me
     .W = 450
     .H = 750
     .Arrangement = Arrange.Vertical
     .Padding = 5
     .Title = "Click on the Gridview below"
   End With

   With GridView1 = New GridView(Me) As "GridView1"
     .Expand = True
     .Tracking = True
     .Columns.count = 1
     .Rows.Count = 0
   End With

   For iLoop = 0 To sDir.Max
     Inc GridView1.Rows.Count
     GridView1[iLoop, 0].Text = sDir[iLoop]
   Next

End

Public Sub GridView1_Click()

   If Mouse.Left Then  'Crashes here
     Print "Left"
   Else
     Print "No"
   End If

End