Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 28.05.2012, 13:52   #1
Gudzik11
Форумчанин
 
Регистрация: 20.10.2011
Сообщений: 138
По умолчанию TreeView

Здравствуйте подскажите как работать с TreeView .

мне нужно создать 10 узлов
Код:
for b:=0 to memo1.Lines.Count-1 do
    if pos('<div class="wwt_day">',Memo1.Lines[b])<>0 then
     begin
        inc(k);
        b1:=(copy(Memo1.Lines[b],    pos('<div class="wwt_day">',Memo1.Lines[b])+21,  ( pos('</div>',Memo1.Lines[b]))-pos('<div class="wwt_day">',Memo1.Lines[b])-21));
       // TreeView1.Items.AddChild(TreeView1.Items.Item[k-1],b1);
        TreeView1.Items.Add(nil, IntToStr(k));
       Memo3.Lines.Add(b1);
а потом в каждый из узлов записать b1
если я делаю так

Код:
	
TreeView1.Items.AddChild(TreeView1.Items.Item[k-1],b1);
то в 1 записуеться b1 потом в b1 ещё b1 и т.д
А мне надо чтоб в 1 записалось b1
в 2 записалось b1
в 3 записалось b1 и т.д
Gudzik11 вне форума Ответить с цитированием
Старый 28.05.2012, 14:03   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,792
По умолчанию

Смотри:
Код:
 for i:=0 to 10 do  begin
  // Вносим родителя запомнив его в переменку
  t:=TreeView1.Items.Add(nil,IntToStr(i));
  // Вносим дите для этого родителя
  TreeView1.Items.AddChildFirst(t,IntToStr(i+20));
 end;
Идея понятна?
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 28.05.2012, 14:07   #3
Gudzik11
Форумчанин
 
Регистрация: 20.10.2011
Сообщений: 138
По умолчанию

понял спасибо
Gudzik11 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Treeview и бд sisofcase БД в Delphi 8 03.04.2012 17:32
TreeView HOOCH94 Компоненты Delphi 3 12.04.2011 18:25
TreeView Claster Помощь студентам 0 20.10.2009 15:41
Treeview forzi Помощь студентам 4 04.05.2008 23:50