освобождение объектов в treeview..

← →
_i (2012-02-21 22:23) [0]

к нодам тривью привязаны объекты, можно ли ускорить цикл освобождения объектов дерева не меняя принципиально сам подход к хранению этих объектов? (beginupdate\endupdate вызываю "снаружи" до входа в этот метод)

procedure ClearNode(ANode: TTreeNode); var i: Integer; begin if ANode = nil then Exit; for i := 0 to ANode.Count - 1 do begin if ANode.Item[i].Data <> nil then begin Dispose(ANode.Item[i].Data); end; if ANode.Item[i].Count > 0 then ClearNode(ANode.Item[i]); end; ANode.DeleteChildren; end;

← →
sniknik © (2012-02-21 22:28) [1]

http://delphimaster.net/view/1-1328811083/

← →
Сергей М. © (2012-02-21 22:37) [2]

А и цикл никакой не нужен - все необходимые циклы уже реализованы в потрохах компонента.

Твое дело - в обработчике события OnDeletion проделать нужные тебе манипуляции с данными, ассоциированными с текущим удалаемым узлом.

> http://delphimaster.net/view/1-1328811083/

в курсе, но то уже кардинальная схема работы с моими данными..

> Твое дело - в обработчике события OnDeletion проделать нужные
> тебе манипуляции с данными, ассоциированными с текущим удалаемым
> узлом.

спасибо, то что надо!)

освобождение объектов в treeview.. Найти похожие ветки