我有一个发送和接收测试应用程序。发送方使用 TIdHTTP:
IdHTTP.ProxyParams.ProxyServer := '127.0.0.1';
IdHTTP.ProxyParams.ProxyPort := 8888;
IdHTTP.Request.ContentType := 'application/json';
..
lResponse := IdHTTP.Post('http://127.0.0.1:8085/ttposttest',lRequest); // Or localhost:8085
问题:在 Fiddler 中,我看到来自接收方的响应,但没有看到发送给它的请求。
我是否也必须在接收应用程序中设置代理?
如果是这样,代码在哪里?
Receiver 是 TWebModule 上的 TWebAction,带有处理程序:
procedure TWebModuleWebServices.WebModuleWebServicesTTPostTestAction(
Sender: TObject; Request: TWebRequest; Response: TWebResponse;
var Handled: Boolean);
var S: String;
begin
S := Request.Content;
Handled := true;
end;
它使用 TIdHTTPWebBrokerBridge:
FWebBrokerBridge := TIdHTTPWebBrokerBridge.Create(Self);
// Register web module class.
FWebBrokerBridge.RegisterWebModuleClass(TWebModuleWebServices);
// Settings:
FWebBrokerBridge.DefaultPort := 8085;