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

Вниз

Как удалять объекты, связаные с TTreeNode.Data   Найти похожие ветки 

 
Алексей   (2005-01-20 03:37) [0]

Всем доброй ночи!
У меня есть дерево, в котором отображается группы и пользователи.
В группе могут быть пользователи и другие группы.
При добавлении группы, создается объект TGroup(мной определен), для пользователя объект ТUser. И каждый объект привязывается к соответствующей Node.data.
Вопрос такой: Когда мне нужно удалить все дерево, то как при удалении правильно освобождать эти созданные объекты. При удалении Ноды, ее data остается. Прохожу подряд по всем узлам, и пишу:
if TObject(Node.data) is TUser then
 TUser(Node.data).free;
 Node:=Node.getnext;
 TreeView.items.delete[Node.getprev);
Также для группы. После запуска выдает ошибку, что-то в духе доступ по неправильному адресу.
Из-за чего это может быть, может что-то не так делаю?


 
ЮЮ ©   (2005-01-20 04:13) [1]

Проще код улаления объекта поместить в обработчике
TCustomTreeView.OnDeletion


 
KilkennyCat ©   (2005-01-20 05:02) [2]


> Node:=Node.getnext;
>  TreeView.items.delete[Node.getprev);


как-то нелогично выглядит... я бы удалял дерево снизу.



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

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

Наверх




Память: 0.44 MB
Время: 0.029 c
8-1097922688
GlavBOTan
2004-10-16 14:31
2005.01.30
Большой Bitmap и маленький A4 (или любой другой)


1-1106125969
Ega23
2005-01-19 12:12
2005.01.30
Выполнится ли Beep ?


8-1098363487
X-Disa
2004-10-21 16:58
2005.01.30
Сохранение иконки


4-1102257133
Леонид
2004-12-05 17:32
2005.01.30
Отлов открытия папки файла!!!


14-1105580718
Kerk
2005-01-13 04:45
2005.01.30
Списки анонимных прокси





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский