List to array?

andre.astafieff · Jun 13, 2013

Hello

A doubt with a List ...

The code below returns the following sequence: (ArrayList) [1, andre.astafieff@gmail.com, 2, 2, 2, 2, 2, -23.3096963, -51.1657752, 06/10/2013 - 16:33:52, 06/10/2013 - 16:33:57]

I need to pass as parameter as follows: "1", "andre.astafieff@gmail.com", "2", "2", "2", "2", "2", "-23.3096963", "-51.1657752", "06/10/2013 - 16:33:52", "06/10/2013 - 16:33:57"

How to proceed?

B4X:

Dim CarregaTabela As List
BrancoDados.setDatabase(Main.IpServer,"xxx","xxxx","xxxx")
CarregaTabela=BrancoDados.Query("select * from bebedeira where mail_user ='" & Main.UserGlobal & "'")

    For i=1 To CarregaTabela.Size-1
        row = CarregaTabela.Get(i)
   Log(row)
    Next

Mahares · Jun 13, 2013

I hope I understood your question Andre:

B4X:

Dim CarregaTabela As List
 CarregaTabela.Initialize

B4X:

Dim strVar As String
 For i=0 To CarregaTabela.Size-1
   strVar= strVar & CarregaTabela.Get(i) & ","
 Next
 strVar=strVar.SubString2(0,strVar.Length-1)  'remove last comma
 strVar=QUOTE & strVar.Replace("," , QUOTE & "," & QUOTE) & QUOTE
 Msgbox(strVar,"")  'returns: "1", "andre.astafieff@gmail.com", "2", "2", "2", "2", "2", "-23.3096963", "-51.1657752", "06/10/2013 - 16:33:52", "06/10/2013 - 16:33:57"

EDITED BY ADDING THIS OPTION: Or perhaps you are looking for this:

B4X:

Dim CarregaTabela As List
CarregaTabela.Initialize

B4X:

For i=0 To CarregaTabela.Size-1
    strArray(i)= CarregaTabela.Get(i)
 Next
'This will return the array:          strArray=Array as String ("1", "andre.astafieff@gmail.com", "2", "2", "2", "2", "2", "-23.3096963", "-51.1657752", "06/10/2013 - 16:33:52", "06/10/2013 - 16:33:57")

List to array?

andre.astafieff

Member

Mahares

Expert

Similar Threads

List to array?

andre.astafieff

Member

Mahares

Expert

Similar Threads

Privacy & Transparency

Privacy & Transparency