Текущий архив: 2002.08.22;
Скачать: CL | DM;
Вниз
Перебрать TreeView Найти похожие ветки
← →
CrazyHackers © (2002-08-13 15:11) [0]Привет!
Хотел бы занести структуру дерева в таблицу (стандартная структура: id, родитель, название).
Не знаю как перебрать весь treeview, определяя при этом имеет ли ветвь подветви. И как вообще правильнее бы это сделать?
Помогите пожалуйста.
← →
Skier © (2002-08-13 15:19) [1]>CrazyHackers
> Не знаю как перебрать весь treeview
Можно так :
var
CurrTreeNode : TTreeNode;
//..................
CurrTreeNode := ATreeView.Items.GetFirstNode;
while CurrTreeNode <> nil do begin
CurrTreeNode := CurrTreeNode.GetNext;
end; //while
//..................
← →
CrazyHackers © (2002-08-13 15:25) [2]А как проверить есть ли "детки"?
← →
Skier © (2002-08-13 15:28) [3]>CrazyHackers
CurrTreeNode.HasChildren или CurrTreeNode.Items.Count > 0
← →
CrazyHackers © (2002-08-13 15:40) [4]:) немного подумав, решил что проще узнавать родителя, так как сразу смогу получить его идентификатор, а значит занести в таблицу. Как в этом случаи? Что я должен передать в качестве парметра?
← →
Skier © (2002-08-13 15:43) [5]>CrazyHackers
if CurrTreeNode.Parent <> nil then begin
with CurrTreeNode.Parent do begin
end; //if
end; //if
Страницы: 1 вся ветка
Текущий архив: 2002.08.22;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.015 c
