B4J Question Reading data @ start from an .ini textfile

[GMan]

I saved a single program parameter (the choosen COM-Port "dartport") in an .ini-file.
When i start the program again i wanted the COM-Port readed in automatically by B4J.

I did save the data this way, but no sense how to open it.

Sub SetupSave_Action
    Dim res As Int = fx.Msgbox2(MainForm, "Änderrungen speichern ?", "Speichern", _
   "Ja", "Cancel", "Nein", fx.MSGBOX_WARNING)
If res = fx.DialogResponse.POSITIVE Then
   Log("Speichere Änderungen...")  
End If
' SPEICHERN
File.OpenOutput("C:\","Port.ini",True)
File.WriteString("C:\","Port.ini",dartport)   
SETUPpane.Visible= False
End Sub

 

[GMan]

Solved it - Erel did a great job with the preview of the correct syntax
Here's is my solution:

    File.OpenInput("C:\","Port.ini")
    dartport = File.ReadString  ("C:\","Port.ini")   
     fx.Msgbox(MainForm, "Ausgewählter COM-Port", dartport)

 

[rwblinn]

Hi,

some additional suggestions:

Sub Process_Globals  ...
  Private dartport As String

Sub SavePort
    Dim res As Int = fx.Msgbox2(MainForm, "Änderrungen speichern ?", "Speichern", "Ja", "Abbruch", "Nein", fx.MSGBOX_CONFIRMATION)
    If res = fx.DialogResponse.POSITIVE Then
        Log("Speichere Änderungen...")
        File.WriteString("C:\","port.ini",dartport)
        'ADD ANY MORE ACTIONS
    End If
End Sub

Sub ReadPort
    dartport = File.ReadString("C:\","port.ini") 
    fx.Msgbox(MainForm, dartport, "Ausgewählter COM-Port")
End Sub