delphi 截取绝对路径的文件名

本文整理自网络，侵删。

 {delphi 截取绝对路径的文件名。}
function ExtractFileName(Str: string): string;
var
i: Integer;
begin
Result := '';
for i := Length(Str) downto 1 do
begin
if Str[i] <> '\' then Insert(Str[i], Result, 0)
else Exit;
end;
end; 

相关阅读 >>

Delphi中exit,abort,break,continue的区别介绍

Delphi 将汉字翻译成拼音缩写的函数

Delphi中webbrowser自动登录路由器网页

什么是嵌入式数据库

Delphi 时间到就触发事件

线程池的概念

isnumeric 判断字符串是否为数字

Delphi版本号检测判断

Delphi 切换大小写的例子

Delphi 串口查询所有com口

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

转载请注明出处：木庄网络博客 » delphi 截取绝对路径的文件名