Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

как в TreeView добавить картинку ? [D6]


Страницы:   1 2

Sp1r1t ©   (2006-12-22 14:34:00) 

Подскажите как добавить картинку в TreeView ?


bolt   (2007-01-03 20:58:00) [1]

Items.Add( nil,'Контрогенты');
  Items.AddChild(Items[0],'111');
  Items.Item[0].ImageIndex:=1;
  Items.AddChild(Items[0],'222');
  Items.Item[1].ImageIndex:=2;

Переделан ввиде:
  Items.Add( nil,'Контрогенты');
  Items.AddChild(Items[0],'111');
  Items.Item[0].ImageIndex:=1;
       Items.Item[0].SelectedIndex:=Items.Item[0].ImageIndex;
  Items.AddChild(Items[0],'222');
  Items.Item[1].ImageIndex:=2;
       Items.Item[1].SelectedIndex:=Items.Item[1].ImageIndex;

Теперь все ВПОРЯДКЕ, картинки при выборе ветки не меняються, МОЖЕТ КОМУ ПОНАДОБИТЬСЯ!


bolt   (2007-01-03 20:21:00) [2]

Сейчас посмотрим!


trubin   (2007-01-03 20:18:00) [3]

См. свойство TTreeNode.SelectedIndex


bolt   (2007-01-03 20:15:00) [4]

Никто не вкурсе?


bolt   (2007-01-02 22:56:00) [5]

Почему?


bolt   (2007-01-02 22:56:00) [6]

Написал так:
TreeViewOrgBase.Images:=ImageList.CreateSize(16,16);
with TreeViewOrgBase do
 begin
   Items.Add( nil,'Контрогенты');
   Items.AddChild(Items[0],'111');
   Items.Item[0].ImageIndex:=1;
   Items.AddChild(Items[0],'222');
   Items.Item[1].ImageIndex:=2;
 end;
end;

Иконки выводит, но при щелчке на какой либо Item, TreeView присваевает текущему Item-у первую картинку из ImageList


bolt   (2007-01-02 22:42:00) [7]

Ну и что решили то?


Германн   (2006-12-23 01:23:00) [8]


> Sp1r1t   (23.12.06 00:47) [21]
>
> дааа, я думал...

Что-то не похоже, что ты хоть раз пытался думать :-(


Sp1r1t   (2006-12-23 00:47:00) [9]

дааа, я думал тут шарящие люди, а получаецца ГГ к-то ((


Loginov Dmitry   (2006-12-22 23:23:00) [10]

>  CurrNode:=TTreeNode.Create(Nodes);


Ето.. А может сразу

CurrNode:=TreeView1.Items.Add{Child}(nil,'Hello');

Ну и далее:
CurrNode.ImageIndex := 1;
CurrNode.SelectedIndex := 1;


Sp1r1t   (2006-12-22 22:05:00) [11]


var CurrNode:TTreeNode;
    Nodes:TTreeNodes;
begin
  TreeView1.StateImages:=ImageList1;
  CurrNode:=TTreeNode.Create(Nodes);
  CurrNode.Text:='Hello';
  CurrNode.StateIndex:=1;
  TreeView1.Items.Add(CurrNode,'123');


Не работает всеравно


Virgo_Style   (2006-12-22 21:54:00) [12]

Sp1r1t   (22.12.06 21:42) [17]
В чем проблема?


Ты работаешь (пытаешься) с несозданным TTreeNode.


Sp1r1t   (2006-12-22 21:42:00) [13]

Ок. Пойдем другим путем )

var СurrNode:TTreeNode;
begin
  TreeView1.StateImages:=ImageList1;
  CurrNode.Text:='Hello';
  CurrNode.StateIndex:=1;
  TreeView1.Items.Add(CurrNode,'123');

в ImageList у меня есть картинки, но выдает ошибку типа выход за предел диапазона - короче память. В чем проблема?


Virgo_Style   (2006-12-22 21:37:00) [14]

Sp1r1t   (22.12.06 21:03) [15]
Ато я помощи с утра уже не дождусь


врешь


Sp1r1t   (2006-12-22 21:03:00) [15]

Или если кто может дать нормальный код в котором можно разобраться новичку - дайте плс. Ато я помощи с утра уже не дождусь ((


Sp1r1t   (2006-12-22 21:02:00) [16]

For Ega23:
не пойму че такое TCustomKdrDBTreeView.AddAllNodes?
Или это откудато часть кода или че это такое ты мне даешь?


Loginov Dmitry   (2006-12-22 15:33:00) [17]

> Еще раз прошу напиши плс чайниковый кодик )


А что, Design-Time уже не в моде?


Ega23   (2006-12-22 15:31:00) [18]


> В TTreeView нет свойств ImageIndex и SelectedIndex.


Правильно. Они есть у TTreeNode.


Sp1r1t   (2006-12-22 15:20:00) [19]

В TTreeView нет свойств ImageIndex и SelectedIndex. А разбираться мне еще сложно в таком. Мне проще на рабочем примере разобраться. Еще раз прошу напиши плс чайниковый кодик )


Loginov Dmitry   (2006-12-22 15:16:00) [20]

Основное здесь - это
ImageIndex и SelectedIndex

Причем эти свойства можно изменять и в Дизайн-Тайме.


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо