Скачать: CL | DM;

Нужно что бы OpenDialog выделял папки а не файлы   Найти похожие ветки 

← →
webSQLNeederr   (2008-03-15 00:03) [0]

Аналогично как в винампе. Как такое сделать?

---

← →
No_Dead ©   (2008-03-15 00:18) [1]

а как в винампе?%>

---

← →
Германн ©   (2008-03-15 00:20) [2]

> Нужно что бы OpenDialog выделял папки а не файлы

В n-ный раз. SelectDirectory.

---

← →
webSQLNeederr   (2008-03-15 00:30) [3]

> В n-ный раз. SelectDirectory.

А где собственно это??

---

← →
Kolan ©   (2008-03-15 00:33) [4]

Удалено модератором

---

← →
webSQLNeederr   (2008-03-15 00:35) [5]

Помогите пожалуйста урывком кода. Буду очень признателен.

---

← →
Kolan ©   (2008-03-15 00:36) [6]

Удалено модератором

---

← →
webSQLNeederr   (2008-03-15 00:38) [7]

Колан не бурчи наночь глядя :)

Хоть где подскажи это искать. Я просмотрел свойства опендиалога ничего подобного нет

---

← →
Германн ©   (2008-03-15 00:39) [8]

> Я просмотрел свойства опендиалога ничего подобного нет

OpenDialog тут ни при чем. SelectDirectory - функция.

---

← →
webSQLNeederr   (2008-03-15 01:30) [9]

В каком модуле эта функция? Так как просто я ввел в делфи и не нашло ее.

---

← →
Johnmen ©   (2008-03-15 01:33) [10]

> Буду очень признателен.

Если не умеешь пользоваться поиском на диске, то озвуч размер признательности :))

---

← →
webSQLNeederr   (2008-03-15 01:42) [11]

> Если не умеешь пользоваться поиском на диске, то озвуч размер
> признательности :))

Признательность в виде Большого Спасибо подойдет?

---

← →
Johnmen ©   (2008-03-15 01:45) [12]

> Признательность в виде Большого Спасибо подойдет?

Не-e-e.
Проще научить тебя поиску :)

---

← →
No_Dead ©   (2008-03-15 01:45) [13]

> [9] webSQLNeederr   (15.03.08 01:30)

не ну вот скажи справки нет? ну так скачай откуда-нибудь

из справки код
uses FileCtrl;

const
 SELDIRHELP = 1000;
procedure TForm1.Button1Click(Sender: TObject);
var
 Dir: string;
begin
 Dir := "C:\MYDIR";
 if SelectDirectory(Dir, [sdAllowCreate, sdPerformCreate, sdPrompt],SELDIRHELP) then
   Label1.Caption := Dir;
end;

ЗЫ. хм&#133 бывают же парадоксы в жизни: у кого-то делфи есть, а справки нет, а у меня наоборот:(

---

← →
webSQLNeederr   (2008-03-15 01:45) [14]

Я не прошу удочку !!! Мне нужна РЫБА :))))

---

← →
Anatoly Podgoretsky ©   (2008-03-15 01:46) [15]

> Признательность в виде Большого Спасибо подойдет?

Это слишком много.

---

← →
webSQLNeederr   (2008-03-15 01:47) [16]

Удалено модератором
Примечание: Флудить завязываем

---

← →
Johnmen ©   (2008-03-15 01:49) [17]

Рыба такова: Пуск - Поиск - Файлы и папки - дальше обычно даже последние чайники соображают....:)

---

← →
webSQLNeederr   (2008-03-15 01:50) [18]

Удалено модератором
Примечание: Флудить завязываем

---

← →
Германн ©   (2008-03-15 01:53) [19]

> webSQLNeederr   (15.03.08 01:30) [9]
>
> В каком модуле эта функция? Так как просто я ввел в делфи
> и не нашло ее.
>

А как ввел?
А куда ввёл?
А правильно ввёл? (Т.е. без ошибок).

Не, ну. Любая версия Дельфи знает эту функцию. Даже Д1.

---

← →
webSQLNeederr   (2008-03-15 01:56) [20]

Удалено модератором
Примечание: Флудить завязываем

---

← →
webSQLNeederr   (2008-03-15 01:58) [21]

Удалено модератором
Примечание: Флудить завязываем

---

← →
MsGuns ©   (2008-03-15 20:26) [22]

>Германн ©   (15.03.08 00:20) [2]
>В n-ный раз. SelectDirectory.

В стиле Win3.1 и без сети

---

← →
Германн ©   (2008-03-15 21:16) [23]

> MsGuns ©   (15.03.08 20:26) [22]
>
> >Германн ©   (15.03.08 00:20) [2]
> >В n-ный раз. SelectDirectory.
>
> В стиле Win3.1 и без сети
>

В n-ный раз. Их две штуки.

---

← →
MsGuns ©   (2008-03-16 01:38) [24]

>Германн ©   (15.03.08 21:16) [23]

1-й вариант

function SelectDirectory(const Caption: string; const Root: WideString; out Directory: string): Boolean; overload;

не дает выставить начальный каталог в стиле OpenDialog как элемент полного дерева файловой системы. Т.е. либо выбирай от самого корня либо только в пределах указанного Root каталога. А это очень неудобно

Или я что-то не так делаю ?

---

← →
Германн ©   (2008-03-16 02:03) [25]

> MsGuns ©   (16.03.08 01:38) [24]
>
> >Германн ©   (15.03.08 21:16) [23]
>
> 1-й вариант
>
> function SelectDirectory(const Caption: string; const Root:
>  WideString; out Directory: string): Boolean; overload;
>
> не дает выставить начальный каталог в стиле OpenDialog как
> элемент полного дерева файловой системы. Т.е. либо выбирай
> от самого корня либо только в пределах указанного Root каталога.
>  А это очень неудобно
>

Это да. Но ты ведь жаловался на другую болячку:
> В стиле Win3.1 и без сети
>

А в остальном, это просто один (но четко рабочий) вариант использования API-шной ShBrowseForFolder. Не нравится этот вариант, пиши свой. Кто против?

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.5 MB
Время: 0.013 c