ルート+ウェブリンクに基づいてファイル/フォルダのパスを特定しますか？

Question

可能性の重複：
Conversion between absolute and relative paths in Delphi

私は、元のWebリンクに基づいてファイルパスを取得する方法を把握しようとしています。私のアプリケーションでは、私は2つの値が設定されています

fRootDir：文字列= C:\Some Directory\My Web Site\（アプリケーションディレクトリ）

fImgPath：文字列= ../Some Other Web Site/SomeImage.jpg（からWebページ）

結果はする必要があります：C:\Some Directory\Some Other Web Site\SomeImage.jpg

画像パスの前に../があることに注意してください。これは、../../../のように連続して多数ある可能性があります。それぞれ../は、を意味します。。画像SomeImage.jpgは実際にはC:\Some Directory\Some Other Web Site\にあります。

ウェブリンクでは/を使用しています。これは\に変換する際に問題ありません。問題は、..に気づいて、実際に上記のディレクトリをそれぞれ探していることです。

ここでは、2つのプロパティを組み合わせて、ルートとイメージパスに基づいて、コンピュータ上でSomeImage.jpgがどこにあるかを最終的なパスにする必要があります。

Answer 1

さらに簡単な操作を行います。

const 
    RootFolder = 'D:\PerforceThuis\Marjan\Probeersels\StackOverflow'; 
    RelativeFolder = '..\..\General\Plugins'; 
begin 
    WriteLn(ExpandFileName(IncludeTrailingBackSlash(RootFolder)+RelativeFolder)); 

はD6でテストされています。出力：

D:\PerforceThuis\Marjan\General\Plugins 

Answer 2

これはPathCanonicalize SHLWAPI functionを使用すると非常に簡単です。

ちょうど

function SimplifyPath(const Path: string): string; 
var 
    buf: array[0..MAX_PATH - 1] of char; 
begin 
    if PathCanonicalize(buf, PChar(Path)) then 
    result := buf 
    else 
    RaiseLastOSError; 
end;