Перехват пакетов в делфи - Работа с сетью в Delphi

C_R_E_S_C_H · 28.07.2012, 20:26

Использую IdHTTPProxyServer но честно говоря смог вывести только заголовки ответа от сервера

Код:

procedure TForm1.IdHTTPProxyServer1HTTPResponse(
  AContext: TIdHTTPProxyServerContext);
begin
Memo1.Lines.Add(AContext.Headers.Text);
end;

Как получить сам пакет от сервера т.е. к примеру Сервер присылает мне пакет он "притормаживается" обрабатывается и если необходимо изменяется (как например в Charles) и отправляется дальше.

Если через этот компонент нельзя это реализовать то подскажите в какую сторону копать

xoodoo · 30.07.2012, 14:15

procedure TForm1.IdHTTPProxyServer1HTTPRespon se(
AContext: TIdHTTPProxyServerContext);
begin
Memo1.Lines.Add(AContext.Document);
end;

C_R_E_S_C_H · 30.07.2012, 22:09

Цитата:

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

Код:

Memo1.Lines.Add(AContext.Document);

Это для просмотра содержимого пакета а как поменять содержимое?

xoodoo · 31.07.2012, 12:13

Цитата:

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

Это для просмотра содержимого пакета а как поменять содержимое?

Кто-то что-то разве мешает обратиться к свойствам и методам объекта Document, предназначенным для модификации его контента ?

28.07.2012, 20:26	#1
C_R_E_S_C_H Пользователь Регистрация: 02.01.2012 Сообщений: 34	Перехват пакетов в делфи Использую IdHTTPProxyServer но честно говоря смог вывести только заголовки ответа от сервера Код: `procedure TForm1.IdHTTPProxyServer1HTTPResponse( AContext: TIdHTTPProxyServerContext); begin Memo1.Lines.Add(AContext.Headers.Text); end;` Как получить сам пакет от сервера т.е. к примеру Сервер присылает мне пакет он "притормаживается" обрабатывается и если необходимо изменяется (как например в Charles) и отправляется дальше. Если через этот компонент нельзя это реализовать то подскажите в какую сторону копать Код: `if Пиво=True then ShowMessage('Пишем дальше'); Else ShowMessage('Да ну вас всех');` Последний раз редактировалось C_R_E_S_C_H; 28.07.2012 в 20:29.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Перехват пакетов	Lui	C/C++ Сетевое программирование	1	03.11.2011 17:57
Отправка пакетов.	Маверик	Работа с сетью в Delphi	6	30.11.2010 18:01
Перехват и чтение содержимого пакетов	Ga-sergey	Работа с сетью в Delphi	11	26.07.2010 14:39
перехват TCP и UDP пакетов	prog.delphin	Работа с сетью в Delphi	4	31.03.2010 13:21
Фильтр пакетов	Stolen	Общие вопросы Delphi	0	07.02.2009 09:38

30.07.2012, 14:15	#2
xoodoo Форумчанин Регистрация: 11.04.2012 Сообщений: 212	procedure TForm1.IdHTTPProxyServer1HTTPRespon se( AContext: TIdHTTPProxyServerContext); begin Memo1.Lines.Add(AContext.Document); end;