本文整理自网络,侵删。
function GetFileNameFromURL(url: string): string;var ts : TStrings;begin //从url取得文件名 ts := TStringList.create; try ts.Delimiter :='/'; ts.DelimitedText := url; if ts.Count > 0 then Result := ts[ts.Count - 1]; finally ts.Free; end;end;
相关阅读 >>
Delphi 得到 winrar 处理解压缩文件的返回值 ?
Delphi xe ioutils 单元(1): 初识 tdirectory.getfiles
Delphi tokyo 版本 twebbrowser 的一个问题(bug?)
Delphi 全局变量 hinstance 到底是在什么时候赋值的?
更多相关阅读请进入《Delphi》频道 >>