Конвертирование кодов в символы (URLDecode в Delphi)

uses
  IdURI;

procedure TForm1.Button1Click(Sender: TObject);
var s, str: string;
begin
  str:='%7B%22data%22%3A%5B%7B%22%D0%A0%D0%B0%D0%B7%D0%BC%D0%B5%D1%80%20%D0%B1%D1%83%D1%84%D0%B5%D1%80%D0%BE%D0%B2%22%3A%2210%22%7D%5D%7D';
  s:=TIdURI.URLDecode(str);
  showmessage(s);
end;