Сообщение от ViNT
Парсить в таком случае нужно строку htmlBody (после вызова htmlBody := GetHttpResponse(conn)  .
Вообще со стандартным HTTP в MP бывают глюки, вроде-бы HTTP запросы лучше реализованы в Lib_proweb (сам не пользовался). |
var conn : http;
s : string;
contentType : string;
I:integer;
begin
// Пытаемся установить соединение с сайтом
www.icq.com
if not OpenHttp(conn, 'http://www.icq.com/people/full_details_show.php?uin=666666') then Halt;
// Задаем метод передачи данных (другие поддерживаемые методы - это HEAD и POST)
SetHttpMethod(conn, get);
// Указываем название нашего браузера
AddHttpHeader(conn, 'User-agent', 'Opera Mini 9.25');
// Отсылаем HTTP запрос и проверяем код ответа (200 = OK)
if SendHttpMessage(conn) <> 200 then Halt;
// Скачиваем запрашиваемый файл (по-идее это index.html)
s := GetHttpResponse(conn);
DrawText( s , 0, 0);
repaint;
delay (9000);
end.
Получил весь текст в одной строке лишнее че-то не убирается
