Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.01.23;
Скачать: CL | DM;

Вниз

TTreeView   Найти похожие ветки 

 
lutik ©   (2005-01-06 19:51) [0]

Как Динамически создать дерево из файла, если в файле записи типа :
"Мастер\Детали\Ключ"
"Мастер\Имя"
"Мастер\Детали\Отвертка"
........................


 
begin...end ©   (2005-01-06 20:02) [1]

> lutik ©   (06.01.05 19:51)

Ну не знаю, насколько это хорошо в смысле производительности, но предлагаю так:

1. Разбираем очередную строку, прочитанную из файла. Получаем несколько разделённых "названий" узлов, и для каждого узла известен его уровень.
2. Смотрим в TreeView: если нет такого узла с соответствующим уровнем, то добавляем его.


 
maxz ©   (2005-01-06 20:05) [2]

var
 t: TTreeNode;
begin
 t:=TreeView1.Items.AddFirst(nil,"fuck");
 TreeView1.Items.AddChild(t,"fuck2")
end;


 
lutik ©   (2005-01-06 20:07) [3]

А как узнать, есть ли уже такой узел или подузел на каждом шаге?


 
lutik ©   (2005-01-06 20:11) [4]

есть ли че стандартное?


 
begin...end ©   (2005-01-06 20:11) [5]

> [3] lutik ©   (06.01.05 20:07)

Перебирать TTreeView.Items, смотреть на Text и Level очередного item"а.


 
lutik ©   (2005-01-06 20:12) [6]

ок, сенкс


 
dimaxx ©   (2005-01-06 23:51) [7]

На сайте www.delphibase.endimus.com есть пример для построения дерева:

Перевод списка файлов/каталогов из TStringList в TreeView с построением "дерева каталогов". Иногда бывает нужно построить "дерево каталогов" по заданному списку файлов и папок (причем физически эти файлы и каталоги могут не существовать).

Ссылу не помню, поскольку текст сохранен в виде текста.



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

Текущий архив: 2005.01.23;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.028 c
4-1102331749
tytus
2004-12-06 14:15
2005.01.23
Как прокрутить текст в ListBox-e?


10-1081131338
niko4543
2004-04-05 06:15
2005.01.23
Word.


14-1105013539
Чеширский_Кот
2005-01-06 15:12
2005.01.23
Blindmаn


10-1078839209
zquestion
2004-03-09 16:33
2005.01.23
Как работать с POA в Delphi 7.


14-1104901142
YurikGL
2005-01-05 07:59
2005.01.23
Бреш в файрволлах!!!