For Android, set the Remote Path to assets\internal
For iOS, set the Remote Path to StartUp\Documents
// XE3 : DBJSON
// Seattle: System.JSON
var
LJsonArr : TJSONArray;
LJsonValue : TJSONValue;
LItem : TJSONValue;
begin
memo1.Lines.Clear;
LJsonArr := TJSONObject.ParseJSONValue(TEncoding.utf8.GetBytes(memo2.Lines.Text),0) as TJSONArray;
for LJsonValue in LJsonArr do
begin
for LItem in TJSONArray(LJsonValue) do
memo1.lines.add(Format('%s : %s',[TJSONPair(LItem).JsonString.Value, TJSONPair(LItem).JsonValue.Value]));
memo1.Lines.Add('');
end;
end;