Delphi 7从路径获取文件夹名称

Question

我有一个路径说C:\ Program Files\Borland什么会打赌解析该字符串最简单的方法,然后返回Borland？谢谢

Answer 1

尝试使用ExtractFileName功能,这个功能只适用(您的例子),如果你的路径不是一个反斜杠敲定,所以你可以使用ExcludeTrailingPathDelimiter功能删除最后一个反斜杠.

看这个样本

program ProjectExtractPathDemo;

{$APPTYPE CONSOLE}

uses
  SysUtils;

var
    Path : string ;
begin
  Path:='C:\Program Files\Borland';
  Writeln(ExtractFileName(Path));//return Borland

  Path:='C:\Program Files\Borland\';
  Writeln(ExtractFileName(Path));//return ''

  Path:='C:\Program Files\Borland\';
  Writeln(ExtractFileName(ExcludeTrailingPathDelimiter(Path)));//return Borland


  Readln;
end.

查看此链接以获取更多信息

路径操作例程

Answer 2

你可以得到最后一个反斜杠后的内容ExtractFileName,它可以在SysUtils单元中找到.