Вниз
Скачать: CL | DM;

Углубленная трассировка   Найти похожие ветки 

 
kyn66 ©   (2009-12-09 10:40) [0]

Добрый день. При очистке веток дерева TreeView, использующего объекты, применяю следующий код:

procedure TRupsFrm.TreeView1Deletion(Sender: TObject; Node: TTreeNode);
begin
 Dispose(PTreeID(Node.Data));
end;

И хотел проверить как выполняется процедура если у ветки нет объекта, т.е Node.Data = Nil. В режиме отладки на вышеприведенном событии компилятор по F7 глубже не входит. Проверка нужна для того чтобы определиться, стоит ли предварительно Data проверять на Nil перед уничтожением

 if Node.Data <> Nil then
   Dispose(PTreeID(Node.Data));

Вопрос: почему в данной ситуации трассировка не переходит в модуль System?


 
RWolf ©   (2009-12-09 10:44) [1]

[x] Use debug DCUs


 
Сергей М. ©   (2009-12-09 10:47) [2]

Потому что используемый в дан.ситуации system.dcu не содержит отладочной инф-ции.

По поводу nil - можешь не проверять, исключения не будет.


 
Andjey   (2009-12-09 10:49) [3]

2RWolf

Спасибо, работает.


 
kyn66 ©   (2009-12-09 10:50) [4]

Ок. Все получилось.


 
Игорь Шевченко ©   (2009-12-09 13:21) [5]

Andjey   (09.12.09 10:49) [3]
kyn66 ©   (09.12.09 10:50) [4]

Вас там, что - группа товарищей ? Или правила форума не для вас написаны ?


 
kyn66 ©   (2009-12-09 15:00) [6]


> Игорь Шевченко ©   (09.12.09 13:21) [5]


Коллега по несчастью. Работаем над одним проектом.


 
Jeer ©   (2009-12-09 18:02) [7]


> Коллега по несчастью. Работаем над одним проектом.


Это поэтому "Булава" не летает ? :)



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.006 c
2-1260339079
oleg1963lora
2009-12-09 09:11
2010.01.31
Посоветуйте. Копирование файлов.


15-1259345408
werty
2009-11-27 21:10
2010.01.31
что такое mailto?


15-1259264658
Игорь Шевченко
2009-11-26 22:44
2010.01.31
Наука нанотехнологий на марше!


2-1260370112
SaaHeK86
2009-12-09 17:48
2010.01.31
помогите пожалуйста с программой


1-1234977811
Skyhawk
2009-02-18 20:23
2010.01.31
Изменение цвета строки в TListView




   Наверх