I have this in a sub form
Public sdevices As String
Public Sub SaveOps_Click()
Settings["Options/CCompCLine"] = TextBox1.Text
Settings["Options/stmDevice"] = ComboBox1.Current
'Settings.Save()
Me.Close
End
Public Sub Form_Open()
Dim devices As String[]
Dim d As String
'
TextBox1.Text = Settings["Options/CCompCLine"]
Shell "stm8flash -l" To sdevices
' fill combobox with devices
devices = Split(sdevices, " ")
For Each d In devices
ComboBox1.Add(d)
Next
' ComboBox1.Find(Settings["Options/stmDevice"])
End
but when I exit this form and then the main form i get s Seg fault
but with the shell part commented out it is ok what am i doing wrong ?
any ideas
Thanks Shane
------------------------------------------------------------------------------
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
[email protected]
https://lists.sourceforge.net/lists/listinfo/gambas-user
