Conversion between absolute and relative paths in Delphi

Question

Are there standard functions to perform absolute <--> relative path conversion in Delphi?

For example:

• \'Base\' path is \'C:\\Projects\\Projec

Answer 1

I just brewed this together:

uses
  ShLwApi;

function RelToAbs(const ARelPath, ABasePath: string): string;
begin
  SetLength(Result, MAX_PATH);
  if PathCombine(@Result[1], PChar(IncludeTrailingPathDelimiter(ABasePath)), PChar(ARelPath)) = nil then
    Result := ''
  else
    SetLength(Result, StrLen(@Result[1]));
end;

Thanks to Andreas and David for calling my attention to the Shell Path Handling Functions.