Про CB

← →
<Lelik> (2005-06-30 17:40) [0]

Привет, программеры!
Такой простой вопрос, а че-то не получается.
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)));
Подскажите, пожалуйста где что не так.
Спасибо!

← →
begin...end © (2005-06-30 19:02) [1]

> <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.

← →
<Lelik> (2005-07-01 18:11) [2]

Спасибо!

Про CB_DIR Найти похожие ветки