Главная страница
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.055 c
1-1105608718
Саня
2005-01-13 12:31
2005.01.23
Сеанс MS-DOS


14-1104137601
Homa_Programer
2004-12-27 11:53
2005.01.23
Копия экрана


1-1104907565
WhiteGuy
2005-01-05 09:46
2005.01.23
Приоритет


3-1103212483
Iova
2004-12-16 18:54
2005.01.23
Ошибка с функцией OpenSchema


1-1105521279
Sndr
2005-01-12 12:14
2005.01.23
Наследование от TForm