DelphiのSelectDirectoryの使い方について

Delphi XE5 Starterを使っています。
次のようにフォルダーを選択するとき、以前選択したフォルダーをデフォルトで選択できるようにしたのですが、こうするとこのフォルダの上にあるフォルダが選択できません。
何か方法はありませんか？
if SelectDirectory('登録するフォルダの選択',SaveFolder,SaveFolder) then begin
ShowMessage(SaveFolder);
ButtonSaveFolder.Caption := SaveFolder;
end;

No.1 ベストアンサー 回答者： nag0720 回答日時： 2015/07/16 23:46

SelectDirectoryの引数にSaveFolderを２つ指定していますが、最初のSaveFolderは参照元のルートフォルダ、２番目のSaveFolderは選択されたフォルダです。

ルートフォルダにSaveFolderを指定すると、それより上のフォルダは選択できませんので、ルートフォルダには上位のフォルダを指定するか、空文字を指定してください。

例えば、
SelectDirectory('登録するフォルダの選択',ExtractFileDrive(SaveFolder),SaveFolder)
SelectDirectory('登録するフォルダの選択','',SaveFolder)
など

この回答へのお礼

回答ありがとうございます。
やっぱり無理ですか。
ほとんど変更することのないフォルダの指定に使用するんですが、
デフォルトフォルダや今の設定フォルダをまず開けばちょっと便利かなと思って質問させていただきました。
空文字を指定するようにします。

お礼日時：2015/07/17 08:18