VPF::TreeView - Форум программистов

Vlad

Дата 1.2.2003, 21:18 (ссылка)

(голосов: 0)

Загрузка ...

Unregistered

Всем привет. Помогите с TreeView. Мне нужно определить, что юзер щелкнул по 2 пункту
(пункт находится в дереве "Моя справка" подпункт "Расход") в компоненте TreeView. Я пробовал это сделать способом, показанным ниже, но тогда при добавлении новой записи в какой-нибудь раздел всё смещается и приходится переписывать код. Помогите!

Код

procedure TCodeLib.TreeView1Change(Sender: TObject; Node: TTreeNode);
begin
 if Node.AbsoluteIndex = 1 then 
   ShowMessage('1 OK');
 if Node.AbsoluteIndex = 3 then 
   ShowMessage('3 OK');
end;

Vit

Дата 1.2.2003, 23:35 (ссылка)

(нет голосов)

Загрузка ...

Vitaly Nevzorov

Профиль
Группа: Экс. модератор
Сообщений: 10964
Регистрация: 25.3.2002
Где: Chicago

Репутация: 48
Всего: 207

Код

if TreeView1.selected.parent<>nil then
  if  (TreeView1.selected.parent.text='Моя справка') and  (TreeView1.selected.text='Расход') then
    ShowMessage('OK');

--------------------

With the best wishes, Vit
I have done so much with so little for so long that I am now qualified to do anything with nothing
Самый большой Delphi FAQ на русском языке здесь: www.drkb.ru

Vlad

Дата 2.2.2003, 00:39 (ссылка)

(голосов: 0)

Загрузка ...

Unregistered

Спасибо!

А нельзя через индексы?

Vit

Дата 2.2.2003, 01:21 (ссылка)

(нет голосов)

Загрузка ...

Vitaly Nevzorov

Профиль
Группа: Экс. модератор
Сообщений: 10964
Регистрация: 25.3.2002
Где: Chicago

Репутация: 48
Всего: 207

Можно, но они же "сползают" как ты сам говоришь... Чудес не бывает, или по индескам, которые "сползают" или по содержимому узла - сравнивать можно текст узла или заносить какой-нибудь указатель в свойство data (пример как его использовать - посмотри в нашем FAQ - там пример как дерево связать с PageControl), или если не используешь картинки, то использовать для хранения индекса свойства для номеров картинок.

--------------------

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »