Delphi ExtractFilePath

1、取路径

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);
var
  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));   //.exe
end;

 

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'。