如何在delphi中使用THTTPClient发布json？

我知道如何使用THTTPClient发送post请求，但如何发布json？ 我的代码：

我的json：

{
    "login": "admin",
    "password": "123456"
}

---

您必须确保所发布的URL在发布时接受json，并且还必须在标题中指定要向URL发送json

标题为：

Content-Type:application/json

---

你见过@RaoufRahiche吗？是的，我见过。这是不同的component@Michael：如果您，

THTTPClient.Post（）

有几个重载，其中一个重载可以发布

TStream

，就像Raouf所指示例中的

TIdHTTP.Post（）

方法一样。Embarcadero的HTTP和REST框架设计的很多灵感都来自Indy的组件，因为Embarcadero在冒险开发自己的框架之前就使用这些组件。

Content-Type:application/json