Consumir WSDL desde Delphi

[[oscarac]]

hola
estuve revisando este post

el tema que aun no logro deducir, es como parsear el JSON

Código Delphi [-]
arr: ResponseSunat2;
  JSo: TJSONObject;
  JSOarray: TJSONArray;
  JSOValue: TJSONValue;
  _Codigo, _Periodo, _Fecha, _Opcion: string;
begin
  arr := GetIConsultaRUCDNI.GetBuscaRUC(Edit1.Text);

  // se recibe la informacion en formato JSON
  JSOarray := TJSONObject.ParseJSONValue(arr) as TJSONArray;

en la ultima linea me aparece el error

[dcc32 Error] Unit1.pas(46): E2250 There is no overloaded version of 'ParseJSONValue' that can be called with these arguments

como puedo "capturar" la informacion que esta en la variable arr ???

[[oscarac]]

investigando, y dandole muchas vueltas al asunto, descubri que puedo aceder a las propiedades de la clase ResposeSunat2 asi

Código Delphi [-]
arr := GetIConsultaRUCDNI.GetBuscaRUC(Edit1.Text);
  Label1.Caption := Format('%s', [arr._razonSocial]);

Espero que le sirva a alguien mas

pero tengo una consulta...
en lo que es busqueda de DNI, como puedo mostrar la foto?

[[movorack]]

Hola, [oscarac]

El manejo de la foto, se revisó en este post

[[oscarac]]

Interesante, pero lo que aun lo logro invocar o deducir es como invocar a la funcion verFoto ??

verfoto ([_res._foto]) ?????

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var _res : ResponseReniec2;
_razon, _dir :string;
begin
  _res := GetIConsultaRUCDNI.GetBuscaDNI(Edit1.Text);
  _RAZON := Format('%s', [_res._primerApellido + ' ' + _res._segundoApellido + ' ' + _res._nombres]);
  _DIR := Format('%s', [_res._direccion]);
  StaticText1.Caption := _razon;
//  VerFoto ([_res._foto]);
end;

procedure TForm1.VerFoto(Foto: TArray< System.Byte >; Image: TImage);
  var
    AStringStream: TStringStream;
begin
  AStringStream := TStringStream.Create(StringOf(Foto));
  try
    AStringStream.Position := 0;
    Image1.Picture.Graphic.LoadFromStream(AStringStream);
  finally
    AStringStream.Free;
  end;
end;

la unidad JPEG esta incluida, estoy usando xe7


me aparecen este error
[dcc32 Error] Unit1.pas(42): E2010 Incompatible types: 'Byte' and 'System.TArray<System.Byte>'