Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2010.01.31;
Скачать: [xml.tar.bz2];

Вниз

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

 
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 вся ветка

Форум: "Начинающим";
Текущий архив: 2010.01.31;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.004 c
15-1258128360
Кто б сомневался
2009-11-13 19:06
2010.01.31
Как скачать файл с помощью батника?


8-1201820831
cerber
2008-02-01 02:07
2010.01.31
"програмно" нажать ссылку в флеш анимации.


2-1260081712
AIK
2009-12-06 09:41
2010.01.31
ms SQl server не отображает русские буквы


15-1258785213
Piter
2009-11-21 09:33
2010.01.31
HTML-ссылка с JS-обработчиком


15-1259403437
acidlord
2009-11-28 13:17
2010.01.31
Транзакции в ДЛЛ





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский