of cause missed that looking in wrong place

Thanks Tony


On 08/08/17 00:17, Tony Morehen wrote:
Shane,

I can reproduce your crash here on 3.9.2.  It's cause is the line:

Settings["Options/stmDevice"] = ComboBox1.Current

If that line is changed to:

Settings["Options/stmDevice"] = ComboBox1.Current.Text

or the simpler, and in my mind preferred:

Settings["Options/stmDevice"] = ComboBox1.Text

The segmentation fault goes away.

So the code that I'd recommend you use (I commented the code changes):

Public sdevices As String


Public Sub SaveOps_Click()

  Settings["Options/CCompCLine"] = TextBox1.Text
'to fix the crash
  Settings["Options/stmDevice"] = ComboBox1.Text
  Settings.Save()
  Me.Close
End

Public Sub Form_Open()
 Dim d As String

   TextBox1.Text = Settings["Options/CCompCLine"]
   Shell "stm8flash -l" To sdevices
'  fill combobox with devices
'trim gets rid of the trailing "\n"
'moving Split into the loop saves an intermediate, unneeded string creation
   For Each d In Split(Trim(sdevices), " ", "", True)
     ComboBox1.Add(d)
   Next
'index = find selects the saved device
  ComboBox1.Index = ComboBox1.Find(Settings["Options/stmDevice"])
End







------------------------------------------------------------------------------
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
_______________________________________________
Gambas-user mailing list
Gambas-user@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gambas-user


------------------------------------------------------------------------------
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
_______________________________________________
Gambas-user mailing list
Gambas-user@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gambas-user

Reply via email to