Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > заюзать диалог "обзор папок"

Автор: _hunter 23.9.2004, 12:10

как можно получить в своей программе диалог "обзор папок" ( тот что в ХР при создании ярлыка появляется )
может компонент где-то такой есть?

Заранее благодарю за ответ.

Автор: <Spawn> 23.9.2004, 12:32

Код

uses FileCtrl;

var
  Dir: string;
begin
  if SelectDirectory('Test', 'C:\', Dir) then
    ShowMessage(Dir);
end;

Автор: _hunter 23.9.2004, 12:36

мда... слона то я и не заметил

спасибо

Автор: Pakshin A. S. 23.9.2004, 17:29

Недавно я пердлегел ещё спасоб: ручками. Если поискать, то можно найти.

Автор: _hunter 23.9.2004, 17:43

можно, конечно, и так, но если есть стандартное решение, почему бы не юзать?

Автор: MacTep 23.9.2004, 22:02

Ответ-то, может и правильный, но только мне никто так и не смог ответить, как расположить этот диалог по центру экрана.

Автор: Pakshin A. S. 24.9.2004, 19:39

А может, через Handle окна получится?

А вообще в таких случаях я всё-таки делаю собственные диалоги (другой стиль, кнопки и расположение)...