Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.09.26;
Скачать: CL | DM;

Вниз

TreeView   Найти похожие ветки 

 
suharew   (2004-09-12 22:09) [0]

Есть treeview, как осушествить в нем поиск?  У меня там находятся много веток(большая структура). Найти элемент мне удается а как сделать что бы он соответствующую ветку раскрыл с указанием искомого элемента ?????


 
Sheng ©   (2004-09-12 23:24) [1]

Ну, если найти удаётся (я так понял, что это TTreeNode), то тогда попробуй так: пусть Node: TTreeNode найденный элемент, тогда Node.Collapse(False {или True, это как надо будет}) или Node.Parent.Collapse(False). Не проверял, но по идее должно работать.


 
suharew   (2004-09-12 23:43) [2]

К сожаления это не работает или я что-то не так сделал.
НО !!!
Есть другой вариант:
 
   Treeview1.Selected:=Treeview1.Items[i];
   Treeview1.SetFocus;

а так как я елемент нашел то i - это известный его порядковый номер.


 
NAlexey ©   (2004-09-13 09:02) [3]

>suharew   (12.09.04 23:43) [2]
Если у тебя ветки содержат большое количество потомков, то я бы не советовал обращаться к нодам по индексу. Слишком медленно будет.


 
Drakosha   (2004-09-13 11:06) [4]


var CurNode:TTreeViewNode;
begin
CurNode:=Tree.getfirstnode//точно не помню
while curnode<>nil do
begin
if curnode есть нужный then
 begin  
   curnode.selected;
   break;
 end;
 curnode:=curnode.getnext;
end;


во как :)


 
evvcom ©   (2004-09-13 11:44) [5]


> var CurNode:TTreeViewNode;
> begin
> CurNode:=Tree.getfirstnode//точно не помню
> ...
> curnode.selected;

var CurNode: TTreeNode;
begin
 CurNode := TreeView.Items.GetFirstNode;
 ...
 CurNode.Selected := True;


 
Drakosha   (2004-09-13 12:49) [6]

ну просто делфы под рукой нет ... идею помню ну а с реализацией чуток запамятовал

проху сильно не бить :))


 
MetalFan ©   (2004-09-13 13:10) [7]

юзай VirtualTreeView!!! при больших объемах летает!!!



Страницы: 1 вся ветка

Текущий архив: 2004.09.26;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.024 c
3-1093853354
ydv
2004-08-30 12:09
2004.09.26
Таймеры в SQL


14-1094208586
peypivo
2004-09-03 14:49
2004.09.26
Не работают сайты с новостями?


1-1094632662
digger
2004-09-08 12:37
2004.09.26
WinErr:01B


9-1085844507
Алексей
2004-05-29 19:28
2004.09.26
Набор команды.


8-1088693104
maxistent
2004-07-01 18:45
2004.09.26
Как сузить битмап?