AppendPaths

procedure AppendPaths(var paths: TPathsD; const extra: TPathsD); inline;