FIdHttp := TIdHttp.create;
FIdHttp.Request.Clear;
FIdHttp.Request.CacheControl := 'no-cache';
FIdHttp.Request.Connection := 'close';
FIdHttp.Request.ContentType := 'application/x-www-form-urlencoded';
FidHttp.Request.ContentLength := 0;
Params := TStringList.Create;
FQQFinderRes := FIdHttp.Post(FSearchUrl, Params);
FIdHttp.Disconnect;
FIdHttp.Free;FSearchUrl 是 php, 同一session只能连10次。
上面的代码应该可以无限连接才对。
可是实际上要关掉程序再运行才能再连接。就是说FIdHttp没释放还是同一应用程序会有共享的session??
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货