Delphi idhttp访问DATASNAP有密码验证的中间件


本文整理自网络,侵删。

 
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 xe10 手机内部系统相关操作(手机信息、震动、剪贴板、键盘、电话、拨号)

Delphi获取盘符代码

Delphi 万年历 程序源码下部分(包括:农历计算、24节气、星期计算、属相)

Delphi 通过api 隐藏任务栏所有托盘图标

Delphi通过进程名获取进程pid函数

Delphi 串口控制继电器

Delphi xe 跨平台(windows、android安卓、苹果macos、苹果ios)写法

Delphi 先加载原内容在写入增加新内容

Delphi 简单的封装messagebox对话框

Delphi中messagebox的用法

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...