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

Вниз

Скажите как правильно работать с TreeViewer   Найти похожие ветки 

 
Vitalnet   (2004-05-10 16:36) [0]

Уважаемые мастера!
Подскажите пожалуйста как добавить item в treeviewer динамически
С уважением Гаврилов В.А.


 
Polevi ©   (2004-05-10 16:38) [1]

AddChild


 
Vitalnet   (2004-05-10 16:59) [2]

=> Polevi
Понятно что AddChild(?!!!!,edit1.text)


 
Курдль ©   (2004-05-10 17:02) [3]

Смотрите: Хэлпы, Сэмплы, Книги (на худой конец).


 
cdadmitriy ©   (2004-05-10 17:24) [4]

Node:=MyTree.Items.GetFirstNode; while Node<>nil do begin Node.Delete; Node:=MyTree.Items.GetFirstNode; end;
 Node1:=MyTree.Items;
 For I1:=0 To PIList.nPI-1 Do Begin
   PI:=PIList.PI[I1]; PI.DNode:=Node1.AddObject(Node1.GetFirstNode,PI.GetStrPI,Pointer(PI));
   FOR I2:=0 TO  PI.NPump-1 Do Begin
     PumpN:=PI.Pump[I2]; PumpN.DNode:=Node1.AddChildObject(PI.DNode,PumpN.GetStrPumpS,PumpN);
     FOR I3:=0 TO  PumpN.NNoz-1 Do Begin
       Noz:=PumpN.Noz[I3]; Noz.DNode:=Node1.AddChildObject(PumpN.DNode,Noz.GetStrNozS,Noz);
     End;
   End;
 End;



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

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

Наверх




Память: 0.47 MB
Время: 0.025 c
1-1083748602
Романов Р.В.
2004-05-05 13:16
2004.05.23
Организация вывода сообщения об ошибке


14-1082982732
Drakon
2004-04-26 16:32
2004.05.23
Использование нелицензионной версии Delphi


4-1080579089
ботинок
2004-03-29 20:51
2004.05.23
окно типа аськи


4-1080815064
WELLiON
2004-04-01 14:24
2004.05.23
Исчезающий значок из трея


7-1081869416
ZSD
2004-04-13 19:16
2004.05.23
Рабочий стол