本文整理自网络,侵删。
idhttp访问DATASNAP有密码验证的中间件
用TIDHttp访问DataSnap Rest服务器,在服务器采用了用户验证的情况下,客户端需要提交密码,否则不能正常连接。
procedure TForm15.Button2Click(Sender: TObject);var url, params, Text: string; code: Integer; http: TIDHttp;begin http:= TIDHttp.Create(nil); http.Request.BasicAuthentication := True; http.request.password := '密码'; // 提交密码 params := Edit1.Text; url:= 'http://192.168.10.182:8081/datasnap/rest/TSM/EchoString/'; try text := http.Get(URL+TIdURI.ParamsEnCode(params)); Edit2.Text := Text; except on E: Exception do begin end; end;end;
https://www.cnblogs.com/hnxxcxg/p/11204825.html
相关阅读 >>
Delphi 10 seattle android应用程序使用toast
Delphi net.httpclient正则批量获取网页代码中的数值
Delphi 按字符串长度对tstringlist的元素进行排序
更多相关阅读请进入《Delphi》频道 >>