回 帖 发 新 帖 刷新版面

主题:delphi的form上怎样添加网页和网上文件链接?

上次提问如何根据网上dbf文件更新本地dbf文件, 有人建议先下载。此建议很好,谢谢。
但是如何添加链接下载? delphi3吗?

回复列表 (共3个回复)

沙发

我在你上一贴中提供的“下载链接”的方案其实是很笨的方案。但我自认为要达到你的那个目的,如果不在web服务器做手脚,单凭本地是没有不笨的办法的。

你可以这样在delphi的form上做超级链接:
[color=FF0000]引用shellAPI单元[/color],即在uses里加shellapi
然后,form上放一个label,在label的onclick事件中添加以下代码:
[color=FF00FF]shellexecute(application.handle,nil,'www.yourweburl.com/yourdbffile.dbf',nil,nil,SW_SHOWNORMAL);[/color]

板凳

uses URLMon;

if UrlDownloadToFile(nil, PChar(URL), PChar(FileName), 0, nil)=0 then
  //下载成功
else
  //下载失败;

3 楼

楼上是好办法。类似的还有用NMHTTP控件的。

我来回复

您尚未登录,请登录后再回复。点此登录或注册