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

Вниз

Узел у TTreeView   Найти похожие ветки 

 
Scali   (2002-09-13 14:29) [0]

Уважаемые Мастера может кто подскажет как на событие OnExpanded
(раскрытие узла),узел автоматически получал фокус или , не раскрывать узел пока этот узел не получит фокус (не будет выделен)
с уважением Scali


 
Рыжик ©   (2002-09-13 14:40) [1]


> узел автоматически получал фокус

procedure TForm1.TreeView1Expanding(Sender: TObject; Node: TTreeNode;
var AllowExpansion: Boolean);
begin
Node.Selected:=true;
end;

> не раскрывать узел пока этот узел не получит фокус (не будет
> выделен)

procedure TForm1.TreeView1Expanding(Sender: TObject; Node: TTreeNode;
var AllowExpansion: Boolean);
begin
AllowExpansion:=Node.Selected;
end;


 
ole ©   (2002-09-13 14:54) [2]

проще кажется использовать автоэкспанд...
тогда ничего не надо делать вообще...



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

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

Наверх




Память: 0.47 MB
Время: 0.01 c
3-85311
bobr12
2002-09-06 14:53
2002.09.26
OLE объекты и InterBase.


1-85565
GoodMan
2002-09-12 15:30
2002.09.26
Помогите собрать число


3-85320
GWeber
2002-09-04 12:25
2002.09.26
Как работать с .mdb базой _БЕЗ_ BDE?


1-85531
Scali
2002-09-13 14:29
2002.09.26
Узел у TTreeView


4-85753
Soft(Unpowered Kiborg)
2002-08-10 12:34
2002.09.26
OnKeyDown в наследнике TPaintBox