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

Вниз

TreeView изменение рисунка   Найти похожие ветки 

 
Никола   (2006-10-29 09:28) [0]

Здравствуйте, подскажите как обработать событие Expanded (развертывание после щелчка по плюсу) так чтоб рисунок узла менялся , например рисунок в виде папки закрытой, после развертывания сменить на открытую, ну конечно же как обработать событие Collapsed(свертывание), тобишь обратно..

Я делаю вот так:

1. развернули узел
procedure TForm1.TVExpanded(Sender: TObject; Node: TTreeNode);
begin
Node.ImageIndex:=1;
end;

2. свернули узел
procedure TForm1.TVCollapsed(Sender: TObject; Node: TTreeNode);
begin
Node.ImageIndex:=0;
end;

Ту возникают две проблемы: 1. узел который выделен, вообще не хочет менять рисунок.
2. После свертывания узла оба рисунка налагаются друг на друга (если рисунок не в виде папок а в виде крестиков енто видно  :(  )

Заранее спасибо


 
rar ©   (2006-10-29 09:55) [1]


> procedure TForm1.TVExpanded(Sender: TObject; Node: TTreeNode);
>
> begin
  TV.Items.BeginUpdate;
> Node.ImageIndex:=1;
  TVl.Items.EndUpdate;
> end;


  Попробуй так, у меня работает


 
Никола   (2006-10-29 09:59) [2]

Node.StateIndex  :))))) но все равно спасибо...



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

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

Наверх




Память: 0.47 MB
Время: 0.087 c
15-1164049823
ArtemESC
2006-11-20 22:10
2006.12.10
Как найти человека в Московской Области?


1-1162125556
Yuiop
2006-10-29 15:39
2006.12.10
Конвертировать из Rave в *.doc


8-1146034876
Devider
2006-04-26 11:01
2006.12.10
Изменение размера изображения при видеозахвате.


15-1163685346
Чапаев
2006-11-16 16:55
2006.12.10
"Детям 60-70-80х посвящается"


2-1164014010
One_More_Slon
2006-11-20 12:13
2006.12.10
что то не уничтожилось :(