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

Вниз

Передвижение по TreeView1   Найти похожие ветки 

 
Виталий Гаврилов ©   (2007-02-19 13:03) [0]

Как организовать передвижение по TreeView1 кнопками , т.е. дублировать перемещение по TreeView1 через кнопки?


 
clickmaker ©   (2007-02-19 13:27) [1]

какие кнопки? TButton?


 
Виталий Гаврилов ©   (2007-02-19 13:30) [2]

TButton конечно :)


 
clickmaker ©   (2007-02-19 13:33) [3]

TTreeNode.GetNextSibling / getPrevSibling, Parent, GetFirstChild etc


 
Elen ©   (2007-02-19 13:33) [4]


> Виталий Гаврилов ©   (19.02.07 13:30) [2]

Например так :
procedure TForm1.Button1Click(Sender: TObject);
begin
if TreeView1.Selected.getNextSibling<>nil then begin
 TreeView1.Selected:=TreeView1.Selected.getNextSibling; end;
TreeView1.SetFocus;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
      if TreeView1.Selected.getPrevSibling<>nil then
 TreeView1.Selected:=TreeView1.Selected.getPrevSibling;
  TreeView1.SetFocus;
end;

А если хочеш по уровням скакать то убери "Sibling"


 
Виталий Гаврилов ©   (2007-02-19 15:02) [5]

Олично спасибо, то что нужно!



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

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

Наверх




Память: 0.47 MB
Время: 0.046 c
6-1159912290
Scar89
2006-10-04 01:51
2007.03.11
Отправка смс


15-1171538435
Ega23
2007-02-15 14:20
2007.03.11
Миграция с Delphi5 на Delphi7


2-1172080442
Lonix
2007-02-21 20:54
2007.03.11
Значок на форме окна


4-1159517125
MetalFan
2006-09-29 12:05
2007.03.11
считать ATIP информацию с CD-R


8-1152608270
DevilDevil
2006-07-11 12:57
2007.03.11
CanvasOrientation или "Как написать справа-налево"