Maps and retrieving Values

Malky · Dec 16, 2012

Hi, I have created a db table called diction, but when I try to query it using the maps option, I keep getting NULL values for some reason?
I know there is data in there as I have copied the db to my PC to test it.

B4X:

Sub PopulateDiction(lang As String)
   Dim Cursor1 As Cursor
   Cursor1 = SQL1.ExecQuery("Select id," & lang & " from diction")
   For i = 0 To Cursor1.RowCount - 1
   Cursor1.Position = i
      Dim m As Map
      m.initialize
      
      m.Put("id",m.Get(i))
      m.Put("lang",m.Get(lang))
      DictionList.Put(i,m.Get("lang"))
   Next
End Sub

The 'lang' variable displays as expected, so I can't possibly see an error in the simple SQL query, but getting the data into usable list is the problem. I need to retrieve a word from a list with an integer and a string based on the integer value.

Am I missing something totally obvious?

Malky

klaus · Dec 16, 2012

Sorry, but i don't understand what exactly you are trying to do:
I don't undersand this code:

B4X:

Dim m As Map
m.initialize
        
m.Put("id",m.Get(i))

You are trying to get a value from a Map you just initialized?
In your case m.Get(i) = Null

Best regards.

Malky · Dec 16, 2012

Hi Klaus, I just want to get the id column and the language column, (which could be en, bg,ru, or gr from the diction table which holds the main language translations. I need the row 'id' and ONLY the selected language, say 'en' for the English column into an array, so then I can display the text of any buttons, labels, texts or messages in the selected language throughout the app. i.e.
label1.text = Languages(34) or whatever index number is needed.

It will get worse later as I have more fields in the other tables I need. What have I started?

Cheers,

Malky

klaus · Dec 16, 2012

If I have really understoud what you want, I would do it that way:

B4X:

Sub PopulateDiction(lang As String)
    Dim Cursor1 As Cursor
    Cursor1 = SQL1.ExecQuery("SELECT id, lang FROM diction")
    For i = 0 To Cursor1.RowCount - 1
        Cursor1.Position = i
        DictionList.Put(Cursor1.GetLong("id"), Cursor1.GetString("lang"))
    Next
End Sub

I have made multilangage apps with one text file for each langauge and load it in a string array. You could have a look at the NotePad app.
I have used this principle for many years also in VB6.

Best regards.

Malky · Dec 16, 2012

Hi Klaus you make it look so easy!!

How do I access the word in dictionlist though?

I am trying to test it with ToastMessageShow(DictionList(2), True) and getting an error as expected. Sure I saw something earlier in posts about this, but been through so many.

Incidentally, I had to change the Cursor1.GetString("lang") part to Cursor1.GetString(lang) without the quotes as it is a variable.

Cheers, and thank you very much again. Been in a rush as I have to go to bed for work tomorrow.

Malky

Maps and retrieving Values

Malky

Active Member

klaus

Expert

Malky

Active Member

klaus

Expert

Malky

Active Member

Similar Threads

Maps and retrieving Values

Malky

Active Member

klaus

Expert

Malky

Active Member

klaus

Expert

Malky

Active Member

Similar Threads

Privacy & Transparency

Privacy & Transparency