[Aristarh Dark]

Страдалецъ, расскажи в чем отличия результатов?

Код:

Var
  Path: String;
begin
 Path := 'C:\ParentDir\ChildDir';
 ShowMessage(Copy(Path,1,Length(Path)-PosEx('\',ReverseString(Path),2)+1));
 ShowMessage(ExtractFilePath(Path));
end;