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 xe 网上获取北京时间android app 启动黑屏优化补丁

Delphi实现阿里云印刷文字识别_身份证识别

Delphi如何开发游戏外挂

Delphi tidhttp+tidssliohandlersocket+ssl

Delphi2007 读取得unicode文本

Delphi注册与卸载系统服务

Delphi 请求时间，为当前时间，数值为1970-01-01以来的毫秒数

用Delphi编写涂鸦桌面的小程序

阻止删除文件(文件占坑)的Delphi代码

Delphi 读取图像文件base64编码加载到image组件显示图片

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

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