[rok_9]

Я разрабатываю простенькие программки для работы с бд. Не давно мне дали заказ на работу с svc(это microsoft ская программа для работы по защищенному соединению с бд.). Вот здесь есть описание сервиса с которым я работаю: http://zak.in.ua/PerformerApiJson.sv...ions/GetOrders.
Я написал такой код

Код:

procedure TForm1.Button2Click(Sender: TObject);
var
  LoginInfo: TStringList;
//  Response: TStringStream;
begin
  try
    LoginInfo := TStringList.Create;
//      LoginInfo.Add('');

    LoginInfo.Add('<string xmlns="http://schemas.microsoft.com/2003/10/Serialization/">');
    LoginInfo.Add('<SecretKey>xxxxxxxxx</SecretKey>');
    LoginInfo.Add('</string>');
    Memo1.Text:=Utf8ToAnsi( IdHTTP1.Post('http://zak.in.ua/PerformerApiJson.svc/GetOrders',LoginInfo) );
  finally
    begin
      LoginInfo.Free;
    end;
  end;
end;

И вот хоть убейте - не работает(вылетает ошибка). Что делать я не знаю. Уже отчаялся...