1、取路径。
1.1 ExtractFilePath之类的返回路径。 原文链接（https://www.cnblogs.com/ZhouXiHong/archive/2007/01/30/634210.html）
ExtractFileDrive ：返回完整文件名中的驱动器，如"C:"
ExtractFilePath：返回完整文件名中的路径，最后带“/”，如"C: est"
ExtractFileDir：返回完整文件名中的路径，最后不带“/”,如"C: est"
ExtractFileName:返回完整文件名中的文件名称 (带扩展名)，如"mytest.doc"
ExtractFileExt返回完整文件名中的文件扩展名（带.），如".doc"
procedure TForm1.btn1Click(Sender: TObject); sFileName : string;begin sFileName := 'F:YSVN项目1 软件1 源代码_正式LEM_ClientinSC_WRAMR.exe'; Memo1.Lines.Append(ExtractFileDrive(sFileName)); //F: Memo1.Lines.Append(extractfilePath(sFileName)); //F:YSVN项目1 软件1 源代码_正式LEM_Clientin Memo1.Lines.Append(ExtractFileDir(sFileName)); //F:YSVN项目1 软件1 源代码_正式LEM_Clientin Memo1.Lines.Append(ExtractFileName(sFileName)); //SC_WRAMR.exe Memo1.Lines.Append(ExtractFileExt(sFileName)); //.exeend;
1.2.取应用程序路径。 原文链接（https://www.cnblogs.com/vage/p/3543484.html）
paramstr(0)：默认代表应用程序的绝对路径（如：d:Projectin est.exe）
对于任何application来说，paramstr(0)都默认代表应用程序的绝对路径（如：d:Projectin est.exe）
那么paramstr(1), paramstr(2）？
delphi帮助解释：从命令行中返回一个特别的参数，
也就是在exe文件后面可以跟参数，paramstr 获取的就是exe文件后面跟参数。
如有可执行文件project1.exe 在运行中输入 e:project1.exe 123 456 789
那么paramstr(1)='123' paramstr(2)='456' paramstr(3)='789'。