Главная страница
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.06 c
1-1169032454
Hero
2007-01-17 14:14
2007.03.11
Где найти TDXOverlay в стандартной DelphiX нет


2-1171946978
Marat
2007-02-20 07:49
2007.03.11
QReport


2-1171965728
lic
2007-02-20 13:02
2007.03.11
Процедура, требующая параметры типа pointer


3-1165593904
Картошка
2006-12-08 19:05
2007.03.11
Экспорт баз данных в Excel вместе с полями БД


4-1162283659
Суслик
2006-10-31 11:34
2007.03.11
TInplaceEdit.Invalidate - помогите понять, что делает метод.