| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Компонент [D5]

TBeginner ©   (2002-09-04 21:22:00) 

Подскажите, пожалуйста, компонент типа TDirectoryListBox, только чтобы напротив каждой папки был CheckBox (ну, чтобы можно было выбирать папки).

---

anod   (2002-09-04 21:57:00) [1]

а для 5ой
procedure TForm1.FormShow(Sender: TObject);
begin
SetWindowLong(ShellTreeView1.Handle, GWL_STYLE,
GetWindowLong(ShellTreeView1.Handle, GWL_STYLE) or TVS_CHECKBOXES)
end;

---

TBeginner   (2002-09-04 21:51:00) [2]

Спасибо. Так а для пятой, стало быть, нет ничего?

---

Ученик   (2002-09-04 21:30:00) [3]

Delphi 6, Delphi 7 - TShellTreeView

procedure TForm1.FormShow(Sender: TObject);
begin
SetWindowLong(ShellTreeView1.Handle, GWL_STYLE,
GetWindowLong(ShellTreeView1.Handle, GWL_STYLE) or TVS_CHECKBOXES)
end;

---

Наверх