![]() |
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу. Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста". Название темы слишком короткое или не отражает сути вашего вопроса. Тема исчерпала себя, помните, один вопрос - одна тема Прочитайте правила и заново правильно создайте тему. |
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Форумчанин
Регистрация: 05.08.2007
Сообщений: 225
|
![]()
Кидаю на форму Edit, OpenDialog и кнопку.
По событию нажатия кнопки пишу: Код:
|
![]() |
![]() |
#2 |
Участник клуба
Регистрация: 07.07.2007
Сообщений: 1,518
|
![]()
Нужно юзать не OpenDialog, а какой-нибудь компонент для выбора каталога. Если такого нет - можно самому написать
Код:
|
![]() |
![]() |
#3 |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
![]()
Не нужно ничего писать. Все уже написано до нас :
uses Qdialog ... procedure TForm1.FormCreate(Sender: TObject); var s:string; begin SelectDirectory('Выбери папку','d:\',s); // s - содержит выбранное. end; Ой прощу прощения не Qdialog а FileCtrl.
I'm learning to live...
Последний раз редактировалось Stilet; 06.05.2009 в 09:03. |
![]() |
![]() |
#4 |
Форумчанин
Регистрация: 05.08.2007
Сообщений: 225
|
![]()
Большое спасибо!
![]() |
![]() |
![]() |
#5 |
Регистрация: 30.11.2008
Сообщений: 3
|
![]()
Спасибо огромное! Мне тож сильно помогло! Только вот еще вопросик: Как сделать чтобы было отображение всех дисков?
|
![]() |
![]() |
#6 | |
Участник клуба
Регистрация: 28.11.2007
Сообщений: 1,521
|
![]() Цитата:
Код:
Код:
Всегда рад помочь!
Последний раз редактировалось Terran; 30.11.2008 в 17:34. |
|
![]() |
![]() |
#7 |
Новичок
Джуниор
Регистрация: 06.05.2009
Сообщений: 1
|
![]() Код:
Последний раз редактировалось Stilet; 06.05.2009 в 09:03. |
![]() |
![]() |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Диалог открытия директории | Altera | Общие вопросы Delphi | 13 | 05.07.2008 12:55 |
выбор директории | Var17 | Win Api | 5 | 13.05.2008 13:50 |
отправка директории | kommunist | Работа с сетью в Delphi | 2 | 19.01.2008 17:24 |
Проверка наличия директории | SANIOK_AV | Общие вопросы Delphi | 2 | 16.01.2008 11:05 |
Выбрать имя папки из директории | Македонский | Общие вопросы Delphi | 15 | 29.08.2007 10:48 |