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

Вниз

Что за класс TTreeNode и с чем его едят?   Найти похожие ветки 

 
Flex_ ©   (2006-02-07 11:59) [0]

В общем встрял с TreeView и добавлением в него объектов(строк), не могу разобраться с функцией AddChild, помогите пожайлуста!


 
Ega23 ©   (2006-02-07 12:04) [1]


procedure TCustomKdrDBTreeView.AddAllNodes(ParentID: Variant;
 ParentNode: TTreeNode);
var
k:Integer;
CurrNode:TTreeNode;
begin
for k:=0 to FTreeItems.Count-1 do
 begin
  With TKdrDBTreeViewItemIdent(FTreeItems.Items[k]) do
   begin
    if (Node<>nil) or (ParentKeyFieldValue<>ParentID) then Continue;
    if ParentNode=nil then
     CurrNode:=Items.Add(nil, DisplayFieldValue)
    else
     CurrNode:=Items.AddChild(ParentNode, DisplayFieldValue);
     CurrNode.ImageIndex:=ImageIndex;
     CurrNode.SelectedIndex:=ImageIndex;
    Node:=CurrNode;
    CurrNode.Data:=FTreeItems.Items[k];
    AddAllNodes(KeyFieldValue, CurrNode);
   end; // With
 end; // for

end;



Рекурсивная процедура. По некоторому списку строит TreeView


 
DesWind ©   (2006-02-07 12:05) [2]

function AddChild(Node: TTreeNode; const S: string): TTreeNode;

А в чем собсна проблема? Node - родитель, s - текст(заголовок Node)


 
Flex_ ©   (2006-02-07 12:17) [3]

Проблема похоже во мне! Просто я никогда не работал с TreeView, и не врубился. Спасибо тебе Ega23! Суть состояла в том, что имеется таблица БД и по ней строится TreeView причём данные в таблице представляют собойдревовидную структуру! Вот и всё!


 
Ega23 ©   (2006-02-07 12:30) [4]


> Проблема похоже во мне! Просто я никогда не работал с TreeView,
>  и не врубился. Спасибо тебе Ega23! Суть состояла в том,
>  что имеется таблица БД и по ней строится TreeView причём
> данные в таблице представляют собойдревовидную структуру!
>  Вот и всё!


посмотри тут
http://delphimaster.net/view/2-1139229210/
начиная с [17]
Я когда-то ваял БД-компонентик, строящий дерево по набору данных.


 
Flex_ ©   (2006-02-07 21:41) [5]

Похоже разобрался, меня свела с толку функция Add... с TTreeNode. Спасибо огромное.



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

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

Наверх




Память: 0.48 MB
Время: 0.066 c
15-1139299391
VitV
2006-02-07 11:03
2006.02.26
FastReport-скачать?


15-1139037393
Репортер
2006-02-04 10:16
2006.02.26
Вывод графики и текста


2-1139277861
Bratskiy
2006-02-07 05:04
2006.02.26
TListBox и TStrings


4-1134166964
Destroyer
2005-12-10 01:22
2006.02.26
Поиск системных папок


8-1126887973
YURAN
2005-09-16 20:26
2006.02.26
Как получить код цвета из .bmp-файла