Get - получаю не полную страницу - Работа с сетью в Delphi

Zoomer123 · 01.02.2013, 16:12

При get запросе, не важно через Synapse или idhttp, в ответ получаю только некоторую часть страницы. Даже не доходит до тега <body>. В браузере все отлично. Чем может быть вызвана эта проблема?

BDA · 01.02.2013, 16:21

2 грубых предположения:
плохое интернет соединение
страница строится с помощью javascript

Приведите ссылку для более легкого диагноза.

Zoomer123 · 01.02.2013, 20:08

Цитата:

Сообщение от BDA

2 грубых предположения:
плохое интернет соединение
страница строится с помощью javascript

Приведите ссылку для более легкого диагноза.

Интернет соединение хорошее, страница - обычный html, css, js, но строится не динамично.

Страницу в лс отправил.

megostudent · 01.02.2013, 20:39

Код:

memo1.lines.Text:= IdHttp1.Get('линк');

и таким образом не выдает тебе исходник?

BDA · 01.02.2013, 20:54

Хм, интересный сайтик.
Они пихнули NUL символ в страницу, поэтому страница режется.
Вот так загрузил всю страницу:

Код:

procedure TForm1.Button1Click(Sender: TObject);
var
  f: tmemorystream;
begin
  f := tmemorystream.Create;
  IdHTTP1.Get('линк', f);
  f.SaveToFile('1.html');
  f.Free;
end;

Zoomer123 · 02.02.2013, 00:34

BDA, большое спасибо, действительно помогло)

Zoomer123 · 02.02.2013, 00:48

P.S. Как выяснилось, способ BDA помог, но лишь отчасти. Точнее он здорово помог, но все равно моей целью была выгрузка кода в Memo. Заметил, что даже загрузка 1.html в Memo происходит не до конца. Опять же код обрывается на той же строке, что и до этого. Решил вопрос по другому - начал использовать RichEdit1 вместо Memo1

01.02.2013, 16:12	#1
Zoomer123 Пользователь Регистрация: 19.01.2012 Сообщений: 33	Get - получаю не полную страницу При get запросе, не важно через Synapse или idhttp, в ответ получаю только некоторую часть страницы. Даже не доходит до тега <body>. В браузере все отлично. Чем может быть вызвана эта проблема?

01.02.2013, 16:21	#2
BDA МегаМодератор СуперМодератор Регистрация: 09.11.2010 Сообщений: 7,291	2 грубых предположения: плохое интернет соединение страница строится с помощью javascript Приведите ссылку для более легкого диагноза. Пишите язык программирования - это форум программистов, а не экстрасенсов. (<= это подпись )

01.02.2013, 20:39	#4
megostudent Форумчанин Регистрация: 31.12.2010 Сообщений: 320	Код: `memo1.lines.Text:= IdHttp1.Get('линк');` и таким образом не выдает тебе исходник?

01.02.2013, 20:54	#5
BDA МегаМодератор СуперМодератор Регистрация: 09.11.2010 Сообщений: 7,291	Хм, интересный сайтик. Они пихнули NUL символ в страницу, поэтому страница режется. Вот так загрузил всю страницу: Код: `procedure TForm1.Button1Click(Sender: TObject); var f: tmemorystream; begin f := tmemorystream.Create; IdHTTP1.Get('линк', f); f.SaveToFile('1.html'); f.Free; end;` Пишите язык программирования - это форум программистов, а не экстрасенсов. (<= это подпись )

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Составить полную спецификацию к подпрограмме ...	petrower	Помощь студентам	4	05.01.2012 16:56
Определить полную поверхность 30-ти пуль.	ms301	Помощь студентам	4	30.12.2011 05:16
через API получаю полный путь и название процесса, а получаю только название процесса	Den7656	Win Api	5	12.09.2011 09:03
Скачать полную версию Delphi?	Doholyan	Общие вопросы Delphi	3	27.06.2009 11:27
Как определить полную версию Windows	Crazyman	Windows	6	27.01.2008 02:19

02.02.2013, 00:34	#6
Zoomer123 Пользователь Регистрация: 19.01.2012 Сообщений: 33	BDA, большое спасибо, действительно помогло)

02.02.2013, 00:48	#7
Zoomer123 Пользователь Регистрация: 19.01.2012 Сообщений: 33	P.S. Как выяснилось, способ BDA помог, но лишь отчасти. Точнее он здорово помог, но все равно моей целью была выгрузка кода в Memo. Заметил, что даже загрузка 1.html в Memo происходит не до конца. Опять же код обрывается на той же строке, что и до этого. Решил вопрос по другому - начал использовать RichEdit1 вместо Memo1