Delphi ExtractFilePath

刘春华

1、取路径

1、取路径。 

1.1  ExtractFilePath之类的返回路径。 原文链接（https://www.cnblogs.com/ZhouXiHong/archive/2007/01/30/634210.html）

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

procedure TForm1.btn1Click(Sender: TObject);
var
  sFileName : string;
begin
  sFileName := 'F:\ZY\SVN\项目\1 软件\1 源代码_正式\LEM_Client\bin\SC_WRAMR.exe';
  Memo1.Lines.Append(ExtractFileDrive(sFileName));  //F:
  Memo1.Lines.Append(extractfilePath(sFileName));   //F:\ZY\SVN\项目\1 软件\1 源代码_正式\LEM_Client\bin\
  Memo1.Lines.Append(ExtractFileDir(sFileName));    //F:\ZY\SVN\项目\1 软件\1 源代码_正式\LEM_Client\bin
  Memo1.Lines.Append(ExtractFileName(sFileName));   //SC_WRAMR.exe
  Memo1.Lines.Append(ExtractFileExt(sFileName));   //.exe
end;

 

1.2.取应用程序路径。  原文链接（https://www.cnblogs.com/vage/p/3543484.html）

paramstr(0)：默认代表应用程序的绝对路径（如：d:\Project\bin\test.exe）

 

对于任何application来说，paramstr(0)都默认代表应用程序的绝对路径（如：d:\Project\bin\test.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'。

来源：https://www.cnblogs.com/hjdgz/p/11977671.html