delphi 获取文件所在路径

最新推荐文章于 2023-02-22 11:40:42 发布

翻译最新推荐文章于 2023-02-22 11:40:42 发布 · 1.2k 阅读

文章标签：

#Delphi #文件使用

delphi 专栏收录该内容

15 篇文章

订阅专栏

本文详细介绍了Delphi中用于获取文件所在路径的多种方法，包括驱动器、完整路径、相对路径、短文件名等，并提供了实际应用示例。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

//delphi 获取文件所在路径
ExtractFileDrive ：返回完整文件名中的驱动器，如"C:"
ExtractFilePath：返回完整文件名中的路径，最后带“/”，如"C:/test/"
ExtractFileDir：返回完整文件名中的路径，最后不带“/” ,如"C:/test"
ExtractFileName:返回完整文件名中的文件名称 (带扩展名)，如"mytest.doc"
ExtractFileExt 返回完整文件名中的文件扩展名（带.），如".doc"

ExtractRelativePath ：返回相对路径，定义如下：
function ExtractRelativePath(const BaseName, DestName: string): string;
使用测试下如：
SysUtils.ExtractRelativePath('C:/test','C:/Test/TestRelativePath'):返回TestRelativePath
SysUtils.ExtractRelativePath('C:/Test/TestRelativePath','C:/test'):返回'../TestRelativePath'
SysUtils.ExtractRelativePath('C:/Test/TestRelativePath/','C:/test'):返回'../../TestRelativePath'
ExtractShortPathName :返回短文件名，即8+3，文件名长八位，扩展名为3号，为保持DOS系统兼容而存在

若想获取的文件名不带路径,可用:
ChangeFileExt(TIdAttachment(Msg.MessageParts.Items[intIndex]).Filename,''); 函数将扩展名改掉即可。