Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

как в TreeView поместить CheckBox [D7, XP]

kirat © (2009-06-16 16:31:00)
Доброго времени суток. Подскажите, как в TreeView поместить CheckBox и им пользоваться?
Большое спасибо!

Германн (2009-06-17 00:36:00) [1]

> DVM © (17.06.09 00:30) [14]
>
>
> > Германн © (17.06.09 00:23) [13]
>
> А четвертое какое? Недоступен?

Точно. Изменяет он мне.
Это я вспомнил свою программу, где было 4 состояния объекта, которые отображались по разному в TRxCheckListBox.
Попутал :(

DVM (2009-06-17 00:30:00) [2]

> Германн © (17.06.09 00:23) [13]

А четвертое какое? Недоступен?

Германн (2009-06-17 00:23:00) [3]

> kirat © (16.06.09 17:23) [8]
>
> Все хорошо а как мне програмно нажать присвоить 1 или 2
> этому CheckBox?
> При создании дерева в TreeView мне нада указать кокой должен
> быть CheckBox 0 или 1 или 2.
>

Если мне не изменяет мой склероз у CheckBox возможны четыре состояния, а не три.

Amoeba (2009-06-16 22:33:00) [4]

> kirat © (16.06.09 17:25) [9]
>
> Может есть уже готовая компонента?

Есть также в составе библиотеки JVCL, к примеру.

DVM (2009-06-16 17:28:00) [5]

> kirat © (16.06.09 17:25) [9]

> Может есть уже готовая компонента?

TVirtualTreeView в нем есть все, что только может потребоваться от дерева.

DVM (2009-06-16 17:26:00) [6]

> kirat © (16.06.09 17:23) [8]

Я ничего не понял.

kirat (2009-06-16 17:25:00) [7]
Может есть уже готовая компонента?

kirat (2009-06-16 17:23:00) [8]
Все хорошо а как мне програмно нажать присвоить 1 или 2 этому CheckBox?
При создании дерева в TreeView мне нада указать кокой должен быть CheckBox 0 или 1 или 2.

sniknik (2009-06-16 17:14:00) [9]
> or WM_VSCROLL);
тогда уж WM_KEYDOWN ...

TreeView1 (2009-06-16 17:08:00) [10]
SetWindowLong(Handle,GWL_STYLE,GetWindowLong(Handle,GWL_STYLE) or WM_VSCROLL);

DVM (2009-06-16 16:55:00) [11]

> kirat © (16.06.09 16:49) [4]

uses CommCtrl;

kirat (2009-06-16 16:49:00) [12]

> With TreeView1 DoSetWindowLong(Handle,GWL_STYLE,GetWindowLong(Handle,
> GWL_STYLE) or TVS_CHECKBOXES);

[Error] Unit1.pas(29): Undeclared identifier: 'TVS_CHECKBOXES'

DVM (2009-06-16 16:45:00) [13]
Вот так:
With TreeView1 Do SetWindowLong(Handle,GWL_STYLE,GetWindowLong(Handle,GWL_STYLE) or TVS_CHECKBOXES);

Далее, для определения того, что кликнули по Checkbox-у поступаем примерно так:

1) В OnMouseDown получаем координаты клика в окне TTreeView
2) function GetHitTestInfoAt(X, Y: Integer): THitTests; - узнаем куда кликнули и попали ли по галочке
3) function GetNodeAt(X, Y: Integer): TTreeNode; определяем узел по которому кликнули.

Ну а дальше дело техники и конкретного применения.

Amoeba (2009-06-16 16:41:00) [14]
http://www.delphikingdom.com/asp/answer.asp?IDAnswer=32524

DVM (2009-06-16 16:38:00) [15]
SetWindowLong() + TVS_CHECKBOXES.

Наверх

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