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

Вниз

TreeView.   Найти похожие ветки 

 
Porolonchick   (2002-09-20 16:07) [0]

Доброго всем времени суток! Господа хорошие, подскажите как узнать индекс итема в TreeView на который кликнули, причём!, когда кликают правой кнопой мыша по итему, то он не становится селектед, посему Selected.AbsoluteIndex не канает или я чего не понимаю. Зарание благодарен. Поролон


 
Dimich1978 ©   (2002-09-20 16:14) [1]

Юзай их
treeview1.selected.parent.index+1,[loCaseInsensitive]);
treeview1.selected.Text ,[loCaseInsensitive]);


 
Porolonchick   (2002-09-20 16:17) [2]

thnx


 
REA   (2002-09-20 16:43) [3]

Насчет правой кнопки - в опциях есть становиться Selected или нет.


 
kex86 ©   (2002-09-22 03:15) [4]

>Rea
У меня эта опция ничего не меняет
>Porolonchick (про правую кнопку)

procedure TForm1.TreeView1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);

begin
if form1.TreeView1.GetNodeAt(X,Y)= nil then exit; // чтоб не было промаха

if button=mbRight then
form1.TreeView1.GetNodeAt(X,Y).Selected:=true;
end;


 
kex86 ©   (2002-09-22 03:22) [5]

А можно и без выделения:

procedure TForm1.TreeView1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);

begin
if form1.TreeView1.GetNodeAt(X,Y)=nil then exit; // чтоб не было промаха

if button=mbRight then
переменная:=form1.TreeView1.GetNodeAt(X,Y).AbsoluteIndex;
end;

но мне больше по душе предыдущий вариант



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

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

Наверх




Память: 0.47 MB
Время: 0.012 c
14-8166
Сергей Чурсин
2002-09-05 13:02
2002.10.03
Программирование для мобилок ? -это перспективно ?


14-8141
Oleg_Gashev
2002-09-07 19:24
2002.10.03
Задачка


8-8070
BaLoo
2002-05-30 03:22
2002.10.03
Подскажите, пожалуйста, как написать МР3/WMA плэер,


1-8024
kex86
2002-09-20 01:47
2002.10.03
Почему на 9910-ый проход циклом по этому коду система начинает


14-8149
Bboy
2002-09-09 12:09
2002.10.03
А есть ли в XP папка, равная папке SendTo в Win9X???