delphi 返回下载地址的文件名

本文整理自网络，侵删。

 function GetURLFileName(aURL: string): string; 
var 
i: integer; 
s: string; 
begin //返回下载地址的文件名 
s := aURL; 
i := Pos('/', s); 
while i <> 0 do //去掉"/"前面的内容剩下的就是文件名了 
begin 
Delete(s, 1, i); 
i := Pos('/', s); 
end; 
Result := s; 
end; 
 

相关阅读 >>

Delphi streamtohexstr

Delphi 检测 iat hook api 的方法

Delphi crc算法的实现

Delphi之tstrings和tstringlists类

Delphi fdquery 判断记录为空

Delphi编程之显示桌面分辨率

Delphi shellexecute 发送邮件

Delphi 新增功能之: ioutils 单元(7): tfile 结构的功能

Delphi xe5 中tmemo控件的应用――for android

Delphi实现解析百度搜索结果link？url=

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

转载请注明出处：木庄网络博客 » delphi 返回下载地址的文件名