using text mappings

[merlin2049er]

Hi, I've got 4 buttons in my app, that I've mapped to a text file with keys.

On the designer the buttons are laid out like this...

[ INPUT 1]
[ INPUT 2]
[ INPUT 3]
[ INPUT 4]

When I read the mapping from the txt file, the inputs are backwards.

[ INPUT 4]
[ INPUT 3]
[ INPUT 2]
[ INPUT 1]

I tried a swapping the mappings, to no avail.
What did I do wrong? lol.

 

[Theera]

Try to see this post #13 and this

 

[Erel]

How are you writing and reading the file? Can you post the code?

 

[merlin2049er]

Ok, here it is; the code to assign the buttons from the text file

'Again we are Not initializing the Map.
   'assign button text from file
    Map1 = File.ReadMap(File.DirRootExternal, "button.txt")
    Button1.Text = Map1.GetValueAt(0)
    Button2.Text = Map1.GetValueAt(1)
    Button3.Text = Map1.GetValueAt(2)
    Button4.Text = Map1.GetValueAt(3)

The code I use to write to the file...

'update mapped Button In saved File
Dim Map1 As Map
Map1.Initialize
Map1.Put(0,Button1.Text)
Map1.Put(1,Button2.Text)
Map1.Put(2,Button3.Text)
Map1.Put(3,Button4.Text)
File.WriteMap(File.DirRootExternal, "button.txt", Map1)

Oh, and the code I use to check to see if the file exists... doesn't seem to work on virtual machine? (I tried both True and False here...)

'create file first time if it doesn't exist  -- not working -- fix it
   If File.Exists(File.DirDefaultExternal,"button.txt") = True Then
   Map1.Initialize
   Map1.Put(0,Button1.Text )
   Map1.Put(1,Button2.Text )
        Map1.Put(2,Button3.Text )
   Map1.Put(3,Button4.Text )
   File.WriteMap(File.DirRootExternal, "button.txt", Map1)
   End If

Thanks,
Joe

 

[Erel]

Please use [ code ] [ /code ] tags (without spaces) when posting code.

File.WriteMap loses the original order.

Why is the order important here (I'm asking in order to suggest a solution)?

 

[merlin2049er]

I guess the order isn't entirely important. Just like to keep things in order.

I should start working on the bluetooth section of my app.