POST
var
Sendmessage:TStringList;//发送内容
Receivemessage:TStringStream;//返回内容
begin
Sendmessage:=TStringList.Create;
Receivemessage:=TStringStream.Create('');
Param.Add('ID=1001');//必须要有Add('字段=值')这种模式,否则传递过去PHP接收的是空值
Param.Add('name=jack');//还可以用Param.Add(head+middle+Edit1.text)的方式连接成有效的数组
Param.Add('sex=male');
IdHTTP1.ReadTimeout:=10000//设置十秒后超时
IdHTTP1.Post('Http://URL',Sendmessage,Receivemessage);
memo1.Text:=Receivemessage.DataString;//显示返回的值
end;