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

Вниз

Открытие папок ка в WinAmp   Найти похожие ветки 

 
Zmei   (2004-10-02 21:47) [0]

Здравствуйте!
Использую диалог открытия папок (SHBrowseForFolder), может кто-нибудь знает как добавить туда чекбокс (для включения подпапок - аналогично в WinAmp)???
Спасибо заранее!!!


 
Гаврила ©   (2004-10-02 22:18) [1]

Насколько я знаю, никак
пиши руками


 
olookin ©   (2004-10-03 00:24) [2]

Насколько я знаю - то как в винампе можно с помощью SelectDirectory.. Или я не знаю, как оно в винампе...


 
antonn ©   (2004-10-03 03:49) [3]

function BrowseFolderDialog(Title: Pchar): string;
var
 TitleName: string;
 lpItemID: PItemIDList;
 BrowseInfo: TBrowseInfo;
 DisplayName: array[0..MAX_PATH] of char;
 TempPath: array[0..MAX_PATH] of char;
begin
 FillChar(BrowseInfo, sizeof(TBrowseInfo), #0);
 BrowseInfo.hwndOwner := getdesktopwindow;
 BrowseInfo.pszDisplayName := @DisplayName;
 TitleName := "Please specify a directory";
 BrowseInfo.lpszTitle := PChar(TitleName);
 BrowseInfo.ulFlags := BIF_RETURNONLYFSDIRS;
 lpItemID := SHBrowseForFolder(BrowseInfo);
 if lpItemId <> nil then begin
   SHGetPathFromIDList(lpItemID, TempPath);
//ShowMessage(TempPath);
   Result := TempPath;
   GlobalFreePtr(lpItemID);
 end;
end;

В uses ShlObj;



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

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

Наверх




Память: 0.47 MB
Время: 0.051 c
4-1095252963
UUU
2004-09-15 16:56
2004.10.17
сервис


3-1095358722
Volodya_
2004-09-16 22:18
2004.10.17
Позиция ScrollBar-а в DBGrid


3-1095748099
stelius
2004-09-21 10:28
2004.10.17
Свойство Filter для строковых значений


1-1096810968
Guest
2004-10-03 17:42
2004.10.17
Как сделать что бы моя прога была позади остальных открытых


1-1096735109
lipskiy
2004-10-02 20:38
2004.10.17
Как из программы открыть файл html в браузере