フォルダ選択ダイアログの作成をするには?

解決


でるでる  2006-04-12 04:55:03  No: 20981  IP: [192.*.*.*]

フォルダの情報が欲しい為、フォルダ選択ダイアログを作成している所ですが、
うまくいきません。こちらのTIPS集にSelectDirectoryで作成する方法が掲載されていましたが、別ウィンドウを開かずに作りたいのです。
DriveComboBoxとDirectoryListBoxで作れるかなと思ったのですが、DirectoryListBoxはドライブ名しか取得できません。自分の使い方が悪いのか、
どうかご教授願います。

編集    削除
igy  2006-04-12 06:23:01  No: 20982  IP: [192.*.*.*]

Delphi5Proで試してみました。

DirectoryListBoxで選択したいフォルダを(クリックじゃなく)ダブルクリックしたあと、

procedure TForm1.Button1Click(Sender: TObject);
begin
    MessageDlg(DirectoryListBox1.Directory, mtInformation, [mbOk], 0);
end;

では、正しく格納されていました。

編集    削除
でるでる  2006-04-12 18:39:04  No: 20983  IP: [192.*.*.*]

出来ました。
DirectoryListBox1.Directoryを知らなかった為、出来ないと
思ってしまいました。
igyさん、ありがとうございました。

編集    削除