I´m trying to convert json into list but when the text contain CRLF I get an error
I try the same in B4A and works ok
I don´t know why
I try the same in B4A and works ok
B4X:
Sub Button2_Click
Dim xTemp As String
xTemp = "[{""text:"" : ""Text without line feed and control return "" }]"
test ( xTemp)
End Sub
Sub Button1_Click
Dim xTemp As String
xTemp = "[{""text:"" : ""Text with " & CRLF & "line feed and control return "" }]"
test ( xTemp)
End Sub
Sub test ( pText As String )
Dim json As JSONParser
Dim xList As List
Try
json.Initialize(pText)
xList = json.NextArray
Label1.Text = "Json OK"
Catch
Log(LastException)
Label1.Text = "Error"
End Try
End Sub
I don´t know why