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

Вниз

Как без нодов жить хорошо   Найти похожие ветки 

 
Сергеич   (2006-07-09 01:48) [0]

Народ, хелп, как реализовать следующие функции на KolTreeView


  MainNode := TrV.Items.AddObject (Node, User, TableData_);//создаём главный узел
  MainNode.Selected := true;//выделяем его
.....
TreeNode := TrV.Items.AddChildObject (MainNode, DMd.ADODS.FieldByName ("System_name").AsString, TableData_);//добавляем дочерний узел с данными
TrV.Items.AddChildObject (TreeNode, "(пусто)", TableData_);//только для плюсика в родительском узле (этот узел скрыт. данные в него добавятся только при его раскрытии)
.....
MainNode.Expand (false);
......
BeginUpdate;
EndUpdate;
......
Node.getFirstChild.Data;


То, что возвращает функция Insert () - это сквозная нумерация или постоянная?

Пример скачал - очень жиденький, не раскрывает всей идеи.


 
Unknown Mystic ©   (2006-07-09 12:57) [1]

Да аналогично все. Открой "Книгу о KOL"...
А для плюсика напротив не развернутых пустых элементов есть TVItemHasChildren[ Node ].

А TVInsert, если о нем речь, возвращает не номер элемента, а его Handle.


 
Сергеич   (2006-07-09 15:13) [2]

Ну вообщем реализовал так (поправьте что, если не так):

MainNode := TrV.Items.AddObject (Node, User, TableData_);
MainNode.Selected := true;
  MainNode := TrV.TVInsert (0, 0, User);
  TrV.TVItemData[MainNode] := TableData_;
  Trv.TVSelected := MainNode;


TreeNode := TrV.Items.AddChildObject (MainNode, ADODS.FieldByName ("name").AsString, TableData_);
TreeNode := TrV.TVInsert (MainNode, 0, AdoDS.FieldByName ("Name"));
        TrV.TVItemData[TreeNode] := TableData_;


Node.getFirstChild.Data;
TrV.TVItemData[TrV.TVItemChild[Item]]

MainNode.Expand (false);
TrV.TVExpand (MainNode, TVE_EXPAND);

Не нашёл аналогов BeginUpdate и EndUpdate.


> А для плюсика напротив не развернутых пустых элементов есть
> TVItemHasChildren[ Node ]

Мне то нужен Node.Data^.ID = 0, тогда я буду знать, что этот узел ещё не заполнялся. Можно, конечно, брать текст узла и если он "(пусто)", значит ещё не заполнялся. Топорно, на мой взгляд.


> Да аналогично все. Открой "Книгу о KOL".

Если на русском, то где взять?


 
Maloric   (2006-07-09 15:30) [3]

Книга о KOL на русском, всегда лежала здесь:
http://bonanzas.rinet.ru/KOLBook.rar


 
Unknown Mystic ©   (2006-07-09 19:42) [4]

BeginUpdate и EndUpdate, тоже в книге посмотри.

А как насчет TVItemExpandedOnce[ Node ]?

А насчет книги... Так на этом форуме отдельная темя с таким названием есть...
http://delphimaster.net/view/11-1140451160/



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

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

Наверх




Память: 0.48 MB
Время: 0.061 c
3-1167357815
NovaC
2006-12-29 05:03
2007.04.01
ADOQuery & WIN98 v4.10


11-1140886672
ECM
2006-02-25 19:57
2007.04.01
Новости сайта kolnmck.ru


15-1173254741
homm
2007-03-07 11:05
2007.04.01
Сплин - скажи


2-1173747390
Ref
2007-03-13 03:56
2007.04.01
Защита от копирования


15-1173259611
Kok
2007-03-07 12:26
2007.04.01
8 марта близко, близко....