我有一个路径,比如C:\Program Files\Borland,最简单的方法是解析该字符串并只返回Borland,你能告诉我怎么做吗?谢谢。
尝试使用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.
查看此链接获取更多信息
您可以使用 SysUtils 单元中的 ExtractFileName
函数获取最后一个反斜杠后面的任何内容。
ExtractFileName(ExcludeTrailingBackslash(Path))
如果您想要直接解析这个字符串并返回 "Borland",您可以这样做:
uses SysUtils;
Delete(Path, 1, LastDelimiter('\', Path));