delphi从路径中分离文件名

本文整理自网络，侵删。

 function GetFileName(FileName: string): string; {从路径中分离文件名}
var Contador: integer;
begin
Contador := 1;
while Copy(FileName, Length(FileName) - Contador, 1) <> '\' do
begin
Contador := Contador + 1;
end;
Result := (Copy(FileName, Length(FileName) - Contador + 1, Length(FileName)));
end; 

相关阅读 >>

Delphi 遍历控件

Delphi xe10 fdmemtable 数据保存本地和从本地加载

Delphi 任务管理器 获取窗口标题 获取窗口图标

Delphi线程的创建、挂起、激活与终止

Delphi treeview节点展开与折叠

Delphi tcolortohex 与 hextotcolor

Delphi 用idhttp得到本机外网ip

Delphi 把修改好的cookies重新赋值给webbrowser1 doc

Delphi 怎么截取文件路径字符串，只保留文件名

Delphi 读取剪粘板内的html格式数据

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

转载请注明出处：木庄网络博客 » delphi从路径中分离文件名