Как сделать свой класс TTreenode?

← →
SergP. (2006-07-14 13:03) [0]

Не удовлетворяет существующий.
Хочу написать наследника, но так чтобы его можно было использовать в TTreeView. Как это сделать?

← →
Плохиш © (2006-07-14 13:07) [1]

type TMyTreeNode = class(TTreeNode) ... end; .... procedure TForm1.TreeView1CreateNodeClass(...); begin NodeClass := TMyTreeNode; end;

← →
SergP. (2006-07-14 13:45) [2]

> procedure TForm1.TreeView1CreateNodeClass(...);
> begin
> NodeClass := TMyTreeNode;
> end;

Спасибо. ИМХО это то что нужно...