Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.07.29;
Скачать: [xml.tar.bz2];

Вниз

Insert/Delete/Edit для TreeView   Найти похожие ветки 

 
Aric   (2002-07-16 12:01) [0]

Приветствую!
Проблема собственно вот в чем:
Есть два TreeView, и три кнопки соответственно Вставка узла, удаление и редактирование, причем редактирование - это не изменение названия узла, а изменение связанных с ним данных из соответствующих СтрингЛистов, для каждого их два.
Нужно отслеживать, на каком именно TreeView, 1 или 2-м, нажаты эти кнопки. ActiveControl не подходит, т.к. в момент нажатия активен контрол кнопки, как я понимаю.
И ваще, буду признательна за пример работы с TreeView, со вставкой и удалением узлов (только не по клавишам), хотя бы...


 
Song   (2002-07-16 12:09) [1]

Вообще по-моему легче расположить их на TabSheet"ах, тогда будет всё логичней.
А если хотите как Вы задумали, тогда можно сделать флажок, который будет показывать какой TTreeView выбран и изменять его на TTreeView.onEnter


 
Skier   (2002-07-16 12:10) [2]

>Aric
Можно "запоминать" какое именно дерево активно в тот момент
когда дерево получает фокус и записывать указатель на текущее дерево во временную переменную.

А в момент нажатия кпонки смотреть - что во временной переменной



 
Digitman   (2002-07-16 12:13) [3]

А каким образом ты умудрилась сделать TTreeView контейнером для кнопок ? Или они просто визуально расположены в зоне клиентского окна компонента TreeView ?


 
TTCustomDelphiMaster   (2002-07-16 12:14) [4]

Заведи переменную
LastActivTreeView: TTreeView;
и изменяй ее значение допустим по onEnter


 
Aric   (2002-07-16 12:22) [5]

Спасибо всем за ответы! Отдыхать, видимо, надо больше. С флпгом все получилось, терь еще вопрос: при смене текущего узла надо менять инфу в Едит-ах, повесила вроде на Changing, но работает как-то криво(


procedure TForm1.TreeView2Changing(Sender: TObject; Node: TTreeNode;
var AllowChange: Boolean);
begin
if TreeView2.SelectionCount <> 0
then
begin
Edit2.Text := TreeView2.Selections[0].Text;
Edit1.Text := St_n2[TreeView2.Selections[0].Index];
Edit3.Text := St_k2[TreeView2.Selections[0].Index];
end;
end;


 
Skier   (2002-07-16 12:26) [6]

>Aric
Лучше повесь на OnChange


 
Aric   (2002-07-16 12:39) [7]

В общем вот это TreeView2.Selections[0].Index; не работает, вернее работает не так, как мне б хотелось. Там хранится индекс в списке выделения, а мне нужен индекс выделенного узла. Помогите!


 
Skier   (2002-07-16 12:41) [8]

>Aric

TreeView2.Selected ?


 
Aric   (2002-07-16 12:43) [9]

Все, вопросы все сняты. Всем спасибо.



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

Форум: "Основная";
Текущий архив: 2002.07.29;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.57 MB
Время: 0.022 c
3-95181
Alecsandr
2002-07-05 17:07
2002.07.29
Использование DbRichEdit и БД Paradox FormattedMemo


1-95335
Leny
2002-07-18 09:30
2002.07.29
Вызов события


1-95282
DenKop
2002-07-17 01:04
2002.07.29
LPT


1-95323
Snake bite
2002-07-17 22:47
2002.07.29
<b>С добрым временем суток</b>


7-95593
Керик
2002-05-11 17:20
2002.07.29
Как загрузить список путей запущенных приложений?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский