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

时间:2012-03-15 16:30:42

标签: delphi winapi delphi-2010 urlencode url-encoding

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

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

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

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

此外,它们都有大量不同的标志,不同的默认值在Windows版本的过程中发生了变化,我无法再找出差异。有谁知道哪一个最适合这个目的?

2 个答案:

答案 0 :(得分:9)

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

{$APPTYPE CONSOLE}

{$R *.res}

uses
  idURI,
  SysUtils;

Var
  FileName : string;
  Encoded  : string;
begin
  try
   FileName:='File with a Very weird f***name*#%*#%<>[]';
   Encoded:=TIdURI.PathEncode(FileName);
   Writeln(Encoded);
  except
    on E: Exception do
      Writeln(E.ClassName, ': ', E.Message);
  end;
  Readln;
end.

这将返回

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

您还可以查看TIdURI.URLDecodeTIdURI.URLEncode函数。

答案 1 :(得分:2)