En este artículo sobre JSON, aprenderemos a como realizar un Parser.
Realizar un Parser, significa que si por ejemplo tenemos un objeto JSON en un archivo, lo deberemos parsear para convertirlo en un objeto propiamente dicho en Delphi.
También se puede utilizar al enviar un JSON a través de un socket, al recibirlo deberemos realizar un Parser para general el objeto JSON y poderlo manejar como tal.
Como realizar un JSON Parser desde Delphi
La sintaxis para realizar un Parser en Delphi sería la siguiente:
TJSONObject := TJSONObject.ParseJSONValue(<JSON>, 0) as TJSONObject;
Donde <JSON> es la cadena tipo JSON que queremos convertir en objeto propiamente dicho.
JSON Parser ejemplo
var
vJSON : TJSONObject;
vTxt : string;
begin
vTxt := '{"data":{"results":[{"Branch":"ACCT590003"}]}}';
vJSON := TJSONObject.ParseJSONValue(TEncoding.ASCII.GetBytes(vTxt), 0) as TJSONObject;
end;