本文整理自网络,侵删。
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 firedac 下的 sqlite [2] - 第一个例子
更多相关阅读请进入《Delphi》频道 >>