• 设为首页
  • 点击收藏
  • 手机版
    手机扫一扫访问
    迪恩网络手机版
  • 关注官方公众号
    微信扫一扫关注
    公众号

在Delphi中URLEncode文件名的最佳方法是什么?

原作者: [db:作者] 来自: [db:来源] 收藏 邀请

相关资料:

http://www.voidcn.com/article/p-uwvfunpb-bwd.html

https://blog.csdn.net/xieyunc/article/details/81568144

 

我的桌面应用程序必须从Internet下载文件.该文件的路径是已知的,文件名本身是半变量,即其他人将在那里放置新文件,我的应用程序将不得不下载它们.

现在我想确保URL是安全的,并且它将被正确解释.此外,如果文件名中有“#”(您永远不知道),我确实希望对其进行编码. Javascript有两个不同的功能:encodeURI和encodeURIComponent.后者还编码’#’字符,以及其他内容.
当然,我可以自己动手,但我认为必须有功能准备就绪,我不妨做出一些旧的错误.

我将使用一个使用WinInet系列API函数(InternetOpen及其同类)的对象下载该文件.

所以我开始在MSDN上进行搜索,当然,还有UrlCanonicalize.但是还有UrlEscape,CreateUri(但这在Delphi 2010单元中没有出现),最后是InternetCreateUrl,这要求我拆分整个URL.我宁愿将URL的第一部分与URLEncoded文件名连接起来.

此外,它们都有大量不同的标志,不同的默认值在Windows版本的过程中发生了变化,我再也无法弄清楚它们之间的差异.有人知道哪一个最适合这个目的吗?

 

尝试TIdURI.PathEncode函数(位于idURI单元中),该函数是delphi附带的Indy库的一部分.

 1 {$APPTYPE CONSOLE}
 2 
 3 {$R *.res}
 4 
 5 uses
 6   idURI,
 7   SysUtils;
 8 
 9 Var
10   FileName : string;
11   Encoded  : string;
12 begin
13   try
14    FileName:='File with a Very weird f***name*#%*#%<>[]';
15    Encoded:=TIdURI.PathEncode(FileName);
16    Writeln(Encoded);
17   except
18     on E: Exception do
19       Writeln(E.ClassName, ': ', E.Message);
20   end;
21   Readln;
22 end.

这将返回

File%20with%20a%20Very%20weird%20f%2A%2A%2Aname%2A%23%25%2A%23%25%3C%3E%5B%5D

您还可以查看TIdURI.URLDecode和TIdURI.URLEncode函数.

 

方法二:

1 uses
2   Httpapp;
3 
4   Edit1.Text := HttpEncode(UTF8EnCode(''));//%E4%B8%AD

 


鲜花

握手

雷人

路过

鸡蛋
该文章已有0人参与评论

请发表评论

全部评论

专题导读
上一篇:
Delphi2010DBExpress+MySQL程序的打包发布时间:2022-07-18
下一篇:
以前的Delphi发布时间:2022-07-18
热门推荐
阅读排行榜

扫描微信二维码

查看手机版网站

随时了解更新最新资讯

139-2527-9053

在线客服(服务时间 9:00~18:00)

在线QQ客服
地址:深圳市南山区西丽大学城创智工业园
电邮:jeky_zhao#qq.com
移动电话:139-2527-9053

Powered by 互联科技 X3.4© 2001-2213 极客世界.|Sitemap