1 方法一：不带\
2
3 GetCurrentDir
4
5
6
7 方法二：带\
8
9 ExtractFilePath(Application.ExeName);
10
11 方法三：带\
12
13 ExtractFilePath(paramstr(0))
14 edit1.Text:=ParamStr(0);//自己全路径c:/555/qq.exe,可用于控制台
15 edit1.text:=ExpandFileName(ParamStr(0)); //获取本程序的完整路径 c:/qq/2.exe
16 edit2.text:=ExtractFileDir(ParamStr(0)); //获取本程序的路径 c:/qq
17 edit3.text:=application.Exename; //获取本程序的完整路径 c:/qq/2.exe,和第1个一样
18 edit4.text:=ExtractFilename(Application.Exename); //获得文件名2.exe
19
20
21
22 ExpandFileName() 返回文件的全路径(含驱动器、路径)
23 ExtractFileExt() 从文件名中抽取扩展名
24 ExtractFileName() 从文件名中抽取不含路径的文件名
25 ExtractFilePath() 从文件名中抽取路径名
26 ExtractFileDir() 从文件名中抽取目录名
27 ExtractFileDrive() 从文件名中抽取驱动器名
28 ChangeFileExt() 改变文件的扩展名
29 ExpandUNCFileName() 返回含有网络驱动器的文件全路径
30 ExtractRelativePath() 从文件名中抽取相对路径信息
31 ExtractShortPathName() 把文件名转化为DOS的8·3格式
32 MatchesMask() 检查文件是否与指定的文件名格式匹配
【推荐】国内首个AI IDE，深度理解中文开发场景，立即下载体验Trae
【推荐】编程新体验，更懂你的AI，立即体验豆包MarsCode编程助手
【推荐】抖音旗下AI助手豆包，你的智能百科全书，全免费不限次数
【推荐】轻量又高性能的 SSH 工具 IShell：AI 加持，快人一步
· 分享一个免费、快速、无限量使用的满血 DeepSeek R1 模型，支持深度思考和联网搜索！
· 使用C#创建一个MCP客户端
· 基于 Docker 搭建 FRP 内网穿透开源项目（很简单哒）
· ollama系列1：轻松3步本地部署deepseek，普通电脑可用
· 按钮权限的设计及实现