|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
05.04.2014, 13:41 | #1 |
Пользователь
Регистрация: 05.04.2014
Сообщений: 10
|
delphi Treeview
Добрые программисты подскажите ерундовую ерунду а то уже 2 дня потерял а сделать не сделал (( надо в TreeView1 занести Items.AddChild
но так чтобы заносился он в тот элемент где стоит курсор скажем есть левел1->левел2->левел3 такая структура дерева скажем стоит курсор на левел2 значит добавить AddChild рядом с левел 3. Пытался через selected сделать но чет не добавляет : procedure TForm2.Button1Click(Sender: TObject); var i :integer; begin if Form2.TreeView1.Selected.Index >0 then begin i:= Form2.TreeView1.Selected.Index; TreeView1.Items.AddChild( TreeView1.Items[i], IntToStr( i )) ; end; end; |
05.04.2014, 13:50 | #2 |
Старожил
Регистрация: 17.11.2010
Сообщений: 19,042
|
А так
Код:
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
|
05.04.2014, 14:10 | #3 |
Пользователь
Регистрация: 05.04.2014
Сообщений: 10
|
спасибо большое действительно работает делал так но параметр не правильно преедавал, спасибо еще раз теперь знаю у кого спрашивать )))
|
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
TreeView. Delphi | novicepro | Помощь студентам | 4 | 08.03.2013 20:01 |
TreeView в Delphi | TaYgA | Помощь студентам | 0 | 04.01.2010 18:30 |
поиск по TreeView в Delphi | TaYgA | Помощь студентам | 4 | 20.12.2009 17:33 |
TreeView (на печать) Delphi | VadEr | Помощь студентам | 2 | 02.11.2009 10:47 |
основы TreeView в delphi | BuT@JL | Общие вопросы Delphi | 11 | 24.04.2009 16:00 |