频道分类

delphi TMS WEB core 实现下载

作者:admin 来源: 日期:2020/3/13 22:02:00 人气: 标签:TMS WEB core

 

procedure TForm2.WebButton1Click(Sender: TObject);
begin
//方法1
 asm
  window.location.href="http://www.simplyaccounts.net/Downloads/Setup.exe";
 end;

//方法2
Application.Download('http://www.cha128.com/api/ip/myip.php');

end;