Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Вниз

TTreeView and TListView 


$Hic0   (2001-12-16 11:49) [0]

Может у кого есть толковый пример как работать с этими компонентами, как связать их, как из одного данные перекидыать в другой на событие OnChange :) Если есть то было-бы хорошо :)
Заранее благодарен



SergeyVP   (2001-12-19 06:11) [1]

я делал приблизительно так

для Tree.OnChange:
------
List.Items.Clear;
for i:= 0 to Tree.Selected.Count-1 do begin
ListItem:= List.Items.Add;
ListItem.Caption:= Tree.Selected.Item[i].Text;
ListItem.ImageIndex:= Tree.Selected.Item[i].ImageIndex;
end;

---------

для List.OnChange:
---------
Tree.Selected.Item[List.Selected.Index].Selected:= true;
----------

Получалось при выборе элемента в Tree, список дочерных узлов загружался в List, а при выборе в List в Tree выделялся выбранный.
Что не понятно - спрашивай.




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.053 c
1-22174           chva                  2001-12-21 00:50  2002.01.08  
Пауза в работе


1-22176           Serg5                 2001-12-20 14:57  2002.01.08  
Опять проблема с текстом: вывожу на экран Image1.Canvas.TextOut, но под самим текстом белый беграунд. Можно ли если не убрать(просто наложить буквы), то хотя бы беграунд сделать чёрным.


14-22396          Merlin                2001-11-02 09:54  2002.01.08  
Сегодня радостный день! Кроме того, что пятница...


6-22269           SERGX                 2001-10-05 16:31  2002.01.08  
Дайте пожалуйста исходники !!


1-22178           Анастасия             2001-12-15 21:38  2002.01.08  
Нужна информация!