Проблемы с кодировкой входного пакета

[C_R_E_S_C_H]

Возникла вот такая проблема

unit Unit1;

interface

uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, IdBaseComponent, IdComponent,
  IdTCPConnection, IdTCPClient, IdHTTP, Vcl.StdCtrls, md5hash, IdAntiFreezeBase,
  Vcl.IdAntiFreeze;

type
  TForm1 = class(TForm)
    Button1: TButton;
    Label1: TLabel;
    IdHTTP1: TIdHTTP;
    Memo1: TMemo;
    IdAntiFreeze1: TIdAntiFreeze;
    procedure Button1Click(Sender: TObject);
  private
  function refsec (name,family,id,auth:AnsiString):AnsiString;
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

{ TForm1 }

procedure TForm1.Button1Click(Sender: TObject);
var
ppac: TstringStream;
begin
ppac := TStringStream.Create(refsec('Иван','Подоляк','41649419','02e92bd6bb03fd2c286ec38119c6ec96'));
memo1.Lines.Add(ppac.DataString);
ppac.free;
end;

function TForm1.refsec(name, family, id, auth: AnsiString): AnsiString;
var
  pac: TStringStream;
begin
  pac := TStringStream.Create('{"f":["vk'+id+'"],"i":"vk'+id+'","k":"'+auth
  +'","l":"","s":{"d":"' + name + ';' + family + ';NaN;ru_RU;0;;","i":"vk'+id+'","l":"ru-RU","n":"'
  + name + ' ' + family + '","u":"http://cs4382.userapi.com/u41649419/a_5014f5f6.jpg","x":"NaN"},"u":"vk'
  +id+'","v":252,"w":40}');
  IdHTTP1.Request.CustomHeaders.Values['locale-name'] := 'ru-RU';
  IdHTTP1.Request.CustomHeaders.Values['client-ver'] := '252';
  IdHTTP1.Request.CustomHeaders.Values['server-method'] := 'SignIn';
  IdHTTP1.Request.CustomHeaders.Values['sign-code'] := string(md5(ansistring('The Matrix has you...' + pac.DataString + 'SignIn')));
  refsec:=(IdHTTP1.post('http://209.190.120.218/Geo/Segment01/segment.ashx', pac));
  pac.free;
end;

end.

Если запускать данный код через Чарли то все нормально пакет отправляется, ответ от сервера получаю и вывожу его в Мемо, но если убрать настройки прокси в программе то в Мемо выводится текст из ? и квадратика.
Соответственно у меня 2 вопроса
Как это возможно?



дописал такую строку

ppac.SaveToFile('111.txt');

попытался открыть файл акелпадом и он мне сказал что файл бинарный
И как это исправить?