Delphi で現在のパスを取得する方法を教えてください。

DelphiではGetCurrentDirファンクションで現在パスを取得できます。以下に記載するようにGetCurrentDirファンクションを定義します。

現在のディレクトリを取得します: 文字列;

以下のように使用します。

var
currentPath: string;
begin
currentPath := GetCurrentDir;
ShowMessage(‘現在のパス：’ + currentPath);
end;

このコードはダイアログボックスを表示して現在のパスを示します。