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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 22.10.2008, 18:09   #1
Johnson
кривокодер ;)
Форумчанин
 
Аватар для Johnson
 
Регистрация: 20.06.2008
Сообщений: 707
По умолчанию "Ручное" добавление в TTreeView

Доброго времени суток, уважаемые!
Запарился я тут с одной проблеммой... вобщем надо из кода заполнить TTreeView основываясь на данные из ini файлов... вот что у меня "вышло" :

Код:
GuidePart1:=TIniFile.Create('Base\Guides\Part1\Des.ini');
Nodes := TTreeNodes.Create(GuideList);
Node := TTreeNode.Create (Nodes);
Node := nil;
  Cnt:=GuidePart1.ReadInteger('Gen','PartCount',0);
  GuideText.Lines.Add(IntToStr(Cnt));
  PName:=GuidePart1.ReadString('Gen','PartName','Строка');   //////////////
  NewNode := TTreeNode.Create(Nodes);
  //GuideList.Items.Add(NewNode,PName);
  NewNode := Nodes.AddNode (NewNode, Node, PName, nil, naAdd);

  for I := 1 to Cnt do begin
      TName:=GuidePart1.ReadString('Part',IntToStr(I),'Ошибка Des.ini файла');
      NewNode := TTreeNode.Create(Nodes);
      //GuideList.Items.AddChild(NewNode,TName);
      NewNode := Nodes.AddNode (NewNode, Node, TName, nil, naAddChild);
  end;
Вобщем данный код в цикле выдаёт новый узел, а надо - потомка...
Вместо принудительного добавления нодов пробовал и встроенными процедурами (сейчас закомментированы)... выдаёт абсолютно то же...

Подскажите, где напортачил?

ЗЫ: пробовал и с TTreeView и с TRzTreeView... одно и то же...
и это... не обращайте внимания, что первая интерация цикла идёт с числом 1... так и надо...
"А как написать праграму?, "ришыти задачьку очинь нада" ©с форума. Жить становится интереснее, жить становится веселее...
{Быть или не быть} {Неуспешный суицид}

Последний раз редактировалось Johnson; 22.10.2008 в 18:13.
Johnson вне форума Ответить с цитированием
Старый 22.10.2008, 19:43   #2
mihali4
*
Старожил
 
Регистрация: 22.11.2006
Сообщений: 9,201
По умолчанию

Повнимательнее почитайте в хэлпе про методы нодов. Там, между прочим, есть и AddChild (добавить детеныша). Кстати, и примеров полно.
mihali4 вне форума Ответить с цитированием
Старый 23.10.2008, 11:17   #3
Johnson
кривокодер ;)
Форумчанин
 
Аватар для Johnson
 
Регистрация: 20.06.2008
Сообщений: 707
По умолчанию

Спасибо, уже почитал... разобрался
"А как написать праграму?, "ришыти задачьку очинь нада" ©с форума. Жить становится интереснее, жить становится веселее...
{Быть или не быть} {Неуспешный суицид}
Johnson вне форума Ответить с цитированием
Ответ


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

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

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


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Ошибка при использовании OlePropertyGet("Documents").OleProcedure("Add") в C++ Builder AleksP C++ Builder 7 11.04.2009 13:06
если пользователь наберет какой-то другой символ не "y" или "n" и нажмет enter, программа проигнорирует skobets Общие вопросы C/C++ 2 03.06.2008 06:51
Excel файл открывается не "до конца" (странички "не показываются" только серое поле) Dorvir Microsoft Office Excel 2 28.03.2008 10:03
Добавление компонентов в "мой компьютер" Oleg-vp Общие вопросы Delphi 1 20.11.2007 15:40
Создаю диаграмму "Bar". Подскажите как убрать растояние между "столбами" MAcK Компоненты Delphi 11 24.10.2007 10:49