| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Про CB_DIR [D7]
<Lelik> © (2005-06-30 17:40:00)Привет, программеры!
Такой простой вопрос, а че-то не получается.
filetype := DDL_ARCHIVE+DDL_READWRITE+DDL_DIRECTORY+DDL_READONLY;
DlgDirListComboBox(Form1.Handle, PChar(Edit1.Text), GetDlgCtrlID(ComboBox1.Handle), 0, filetype);
Работает.
А как воспользоваться напрямую CB_DIR
Так не получается
SendMessage(ComboBox1.Handle, CB_DIR, filetype, Integer(PChar(Edit1.Text)));
И так
SendDlgItemMessage(Form1.Handle, GetDlgCtrlID(ComboBox1.Handle), CB_DIR, filetype, Integer(PChar(Edit1.Text)));
Подскажите, пожалуйста где что не так.
Спасибо!
<Lelik> (2005-07-01 18:11:00) [1]Спасибо!
begin...end (2005-06-30 19:02:00) [2]> <Lelik> (30.06.05 17:40)
> Так не получается
> SendMessage(ComboBox1.Handle, CB_DIR, filetype, Integer(PChar(Edit1.Text)));
Получается. Если Edit1.Text -- это имя каталога, и нужно получить список его файлов с заданными атрибутами, дополните имя нужной маской. Например, если Edit1.Text = 'C:\*.*', то CB_DIR выведет все файлы в корневом каталоге диска C, удовлетворяющие указанным атрибутам. И ещё одно маленькое замечание: вместо сложения атрибутов лучше производите над ними операцию or.
| |
