varhttp: TIdHttp;sendtoserver: TStringStream;str: string; beginhttp := TIdHttp.Create(); // 創建http.HandleRedirects := True; // 允許轉頭http.ReadTimeout := 3000; // 延遲時間http.Request.ContentType := 'application/json'; // 要求格式sendtoserver := TStringStream.Create(joserv.AsJSON());str := http.Post('http://192.168.1.149/epark/WinData.php', sendtoserver); // 服務器端 end;

?

轉載于:https://www.cnblogs.com/studypanp/p/4906371.html

創作挑戰賽新人創作獎勵來咯，堅持創作打卡瓜分現金大獎

總結

以上是生活随笔為你收集整理的delphi Post数据到网页的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。