Вниз
Скачать: CL | DM;

Проблемы с TreeView   Найти похожие ветки 

 
rrer   (2003-04-11 13:34) [0]

В Treeview необходимо при щелчке заменять картинку на другую.Сам treeView связан с imagelist-ом через cd-во images.ImageList содержит две картинки.
Я пишу:

procedure TForm1.TreeView1Click(Sender: TObject);
begin
TreeView1.Items.Item[TreeView1.Selected.Index].ImageIndex:=1;
end;

Картитнка заменяется,но только при переходе на другой пункт.Т.е. идет замена с обозданием на один щелчок (например:я кликнул на пункт 4,затем на 5.Только после щелчка на пукт 5 у 4 изменилась картинка,как будто бы я кликнул на него).Скажите как это исправить или как вообще сделать изменение картинки?


 
Roma ©   (2003-04-11 13:45) [1]

Ты разницу между ImageIndex и SelectedIndex не понимаешь, очевидно... Когда ты кликаешь на TreeItem, отображается не ImageIndex, а SelectedIndex...


 
Digitman ©   (2003-04-11 13:47) [2]

SelectedIndex остался прежним ... равный прежнему ImageIndex

Description

Use the SelectedIndex property to specify an image to display when the tree node is selected.


 
rrer   (2003-04-11 14:08) [3]

Ну хорошо...так как сделатть то?


 
evvcom ©   (2003-04-11 14:57) [4]

Здесь даже динамика не нужна. Пропиши прямо в редакторе свойств
ImageIndex := 0;
SelectedIndex := 1

и усё!


 
Silver Alex ©   (2003-04-11 14:59) [5]

procedure TForm1.TreeView1GetImageIndex(Sender: TObject; Node: TTreeNode);
begin
if Node.Level=0
then Node.ImageIndex:=18
else Node.ImageIndex:=19;
end;

procedure TForm1.TreeView1GetSelectedIndex(Sender: TObject;
Node: TTreeNode);
begin
if Node.Level=0
then Node.ImageIndex:=30
else Node.ImageIndex:=19;
end;





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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.02 c
14-67446
X-Man
2003-04-05 15:04
2003.04.21
HTML Print???


8-67392
*Dimchik
2003-01-20 02:40
2003.04.21
Как выхвать список зарегистрированных кодеков в системе


1-67306
Мыш
2003-04-09 02:05
2003.04.21
access violation


7-67572
GrBob
2003-03-01 10:20
2003.04.21
Одновременное нажатие клавиш


14-67473
Тих
2003-04-03 00:23
2003.04.21
Oracle унд MS SQL




   Наверх