Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

TObject + TObjectList + Assigned


SIV5000 ©   (2011-04-29 21:36:00) 

Народ привет. Подскажите пожалуйста как проверить не освобожден ли TObject. Например:

Есть MyList:TObjectList; Добавляю в него

TMyObj = class (TObject)
fName :String;
End;

Есть переменная var Object1

Присваиваю:
Object1:= MyList.Items[0];

Потом удаляю MyList.Delete(0);

А вот теперь, если хочу обратиться к Object1.fName то выдает ошибку.
is Assigned(MyObj) в таком случае не работает. Вот если сделать Object1:= nil; тогда is Assigned(MyObj) равно False;

Есть ли какие то другие способы?


SIV5000   (2011-04-30 16:56:00) [1]

Ясно, всем спасибо. Прийдеться немного переписать :)


sniknik   (2011-04-30 12:19:00) [2]

> Точно никак?
абсолютно!

наглядный пример/практическая демонстрация...
подойди к окну, найди птичку (ну воробьи у вас там водятся?), укажи на нее пальцем...
ну вот, палец это указатель на объект, воробей соответственно объект (абстрактный т.к. ничего не делает).
теперь отвернись от окна, смотри ТОЛЬКО на палец, "МОНИТОРЬ" его состояние... что можешь сказать о птичке? она еще там? или уже улетела/ее съела кошка? подожди несколько минут, а сейчас? есть она там или нет? НЕ СМОТРЕТЬ в окно я сказал!
как только посмотришь это будет обращение к объекту, с соответствующей ошибкой (см. свой же вопрос).


_Юрий   (2011-04-30 11:52:00) [3]


>  Assigned(MyObj) в таком случае не работает.


Assigned просто проверяет на nil.
И все, больше ничего не делает.
При разрушении же указатели не обниливаются.


SIV5000   (2011-04-30 11:07:00) [4]


> Никак проверить сей факт не возможно!

Точно никак?


Германн   (2011-04-30 02:36:00) [5]


> SIV5000   (29.04.11 21:36)
>
> Народ привет. Подскажите пожалуйста как проверить не освобожден
> ли TObject

Никак проверить сей факт не возможно!
P.S. Странно, что ЮЗ не привёл свой пример о "телефонной книге".


Юрий Зотов   (2011-04-29 22:02:00) [6]

Если, конечно, после создания ObjectList у него не менялось OwnsObjects.


Юрий Зотов   (2011-04-29 22:00:00) [7]

Если ObjectList создавался с параметром TRUE, то после Delete объект точно уничтожен, можно даже и не проверять.

А если ObjectList создавался с параметром FALSE, то после Delete объект точно НЕ уничтожен, тоже можно не проверять.


Наверх

Титульная страница Поиск, карта сайта Написать письмо