http post 问题（原创，作者：cnzrs）

（原创，作者：cnzrs）

解决了一个问题， http post 问题
但是，很奇怪，以下的代码在delphi7上面成功运行，但是在家里的delphi6却不行。
procedure TForm1.Button1Click(Sender: TObject);
var
aStrs:TStringList;
begin
aStrs:=TStringList.Create;
aStrs.add('D0=all');//表单 变量名=变量值
aStrs.add('D1=jia');

aStrs.add('D2=all');
aStrs.add('D3=all');
aStrs.add('D4=all');
idhttp1.Host:='http://localhost/';
//idhttp1.AllowCookies:=false;
memo1.Text:=idhttp1.Post('http://localhost:17171/result.php',aStrs)
end;

end.

（原创，作者：cnzrs）