我正在使用 HttpCli 组件表单 ICS 来发布请求。我使用组件附带的示例。它说:
procedure TForm4.Button2Click(Sender: TObject);
var
Data : String;
begin
Data:='status=no';
HttpCli1.SendStream := TMemoryStream.Create;
HttpCli1.SendStream.Write(Data[1], Length(Data));
HttpCli1.SendStream.Seek(0, 0);
HttpCli1.RcvdStream := TMemoryStream.Create;
HttpCli1.URL := Trim('http://server/something');
HttpCli1.PostAsync;
end;
但事实上,它不会发送
状态=否
但
地位
不明白,问题出在哪里。也许有人可以举个例子,如何在 HttpCli 组件的帮助下发送 POST 请求?
PS 我不能使用 Indy =)