Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 04.02.2011, 11:45   #1
Anatai
 
Регистрация: 23.01.2011
Сообщений: 5
По умолчанию Обработка масссива приходящего от web сервиса

Ошибка в следующем, от веб сервиса приходит все данные как надо но в массив не записываться.
Сама ошибка:
Цитата:
SOAP Response Packet: result element expected, received "<ns2:getCityResponse xmlns:ns2="http://ws.appserver.corinf/"><City><id>1</id><name>java</name><zip>1234</zip><street>hkhk</street><road>jhgkj</road><house>khghg</house><phone>uhkjh</phone><wood>khkjkj</wood><piza>hkgk</piza><door>jkhkj</door></City><City><id>2</id><name>scifi</name><zip>34353</zip><street>sdsds</street><road>khvcx</road><house>ilhuiho</house><phone>lkjkl</phone><wood>klhioh</wood><piza>xml</piza><door>xml</door></City><City><id>3</id><name>lhhiu</name><zip>8980</zip><street>lhidsfsd</street><road>bkjkujh</road><house>huoho</house><phone>uohgs</phone><wood>khiovds</wood><piza>ohfsd</piza><door>fsfsd</door></City></ns2:getCityResponse>"
Код:
procedure TForm1.Button1Click(Sender: TObject);
var
  City : Array_Of_City;
begin
  try
    City := (HTTPRIO as ProcessService).getCity; //Вот тут возникает ошибка
  except on e : Exception do
    Memo3.Lines.Add(e.Message); 
  end;
end;

procedure TForm1.HTTPRIOAfterExecute(const MethodName: String;
  SOAPResponse: TStream);
begin
  Memo1.Lines.LoadFromStream(SOAPResponse);
end;

procedure TForm1.HTTPRIOBeforeExecute(const MethodName: String;
  var SOAPRequest: WideString);
begin
  Memo2.Lines.Add(SOAPRequest);
end;
Запрос отправляется нормально, но ответ в обработчике HTTPRIOAfterExecute приходит пустой, а потом возникает ошибка. Можете подсказать что можно сделать?

Последний раз редактировалось Stilet; 05.02.2011 в 15:34.
Anatai вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Операции над максимальными элементами масссива ( С ) Dest Общие вопросы C/C++ 4 14.05.2009 17:50
Регистрация сервиса Terran Общие вопросы Delphi 5 01.11.2008 18:15
Создание защищенного сервиса miae Общие вопросы Delphi 5 21.01.2008 18:54