Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.12.19;
Скачать: CL | DM;

Вниз

Как OpenDialog настроить на выбор не файла, а папки?   Найти похожие ветки 

 
Chainik   (2003-12-08 17:47) [0]

Извиняйте за ламерский вопрос - давно не программил


 
Daemys ©   (2003-12-08 17:49) [1]

никак


 
Chainik   (2003-12-08 17:52) [2]

Неужели писать свой диалог? :(
Может где есть уже готовый?


 
Daemys ©   (2003-12-08 18:15) [3]

есть готовый SHBrowseForFolder


 
WithOut Any ... ©   (2003-12-08 18:32) [4]

Загляни на сайт Подгоретского. Меня впоне устроило


 
pavel_k   (2003-12-08 19:31) [5]

function GetPath(mes: string):string;
var
Root: string; // корневой каталог
pwRoot : PWideChar;
Dir: string;
begin
Root := ""; // корневой каталог не указан => весь комп
GetMem(pwRoot, (Length(Root)+1) * 2);
pwRoot := StringToWideChar(Root,pwRoot,MAX_PATH*2);

if DirectoryExists(MainForm.PathEdit.Text) then
Dir:=MainForm.PathEdit.Text;

if SelectDirectory(mes, pwRoot, Dir)
then
if length(Dir) = 2
then GetPath := Dir+"\"
else GetPath := Dir
else
GetPath := "";
end;


Если Root устанавливать например в "c:", то можно выбирать папку только на диске c.
Отлично работает!


 
Александр из Минска ©   (2003-12-08 23:56) [6]

А в RXLib есть уже готовый TDirectoryEdit (и довольно прилично выглядит, если свойство Style поменять)



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

Текущий архив: 2003.12.19;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.018 c
1-62006
Wilsh
2003-12-06 17:02
2003.12.19
TMemo или TRichEdit


14-62206
TriX
2003-11-26 18:13
2003.12.19
HELP ME !!!!!!!!!!!!!


14-62189
panov
2003-11-10 13:37
2003.12.19
Снова о работе.


3-61942
HellTrooper
2003-11-26 21:17
2003.12.19
Фильтрация....


4-62329
Митяй2
2003-10-24 10:44
2003.12.19
Определение сессии Windows.