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

Вниз

Освобождение памяти   Найти похожие ветки 

 
Просто прохожий   (2002-08-16 21:57) [0]

TMyClass = class
FCount : Integer;
FItems : array of Integer;
constructor Create (Count : Integer);
.......................................
end;

constructor Create (Count : Integer);
begin
inherited Create;
FCount := Count;
SetLength (FItems, FCount);
end;


Вопрос: при уничтожении объекта этого класса вся память, занимаемая им, освободится автоматически, или в деструкторе нужно дополнительно писать: Finalize (FItems), а уже потом вызывать унаследованный деструктор?


 
Anatoly Podgoretsky   (2002-08-16 22:11) [1]

Достаточно FItems := nil


 
Просто прохожий   (2002-08-16 22:20) [2]

Так значит всё-таки надо деструктор дополнительно описывать? Унаследованного недостаточно?


 
Anatoly Podgoretsky   (2002-08-16 22:55) [3]

Ну так раз в конструкторе захватываешь ресурсы, то больше негде их освободить


 
Юрий Зотов   (2002-08-16 22:58) [4]

> Вопрос: при уничтожении объекта этого класса вся память,
> занимаемая им, освободится автоматически,

Да, занимаемая им САМИМ - освободится автоматически. В том числе, освободятся 4 байта, которые занимает УКАЗАТЕЛЬ FItems. Но не освободятся ТЕ 4*Count байт, которые занимает ТЕЛО массива. Поскольку ЭТА память к САМОМУ объекту никакого отношения не имеет.

Вот и выходит, что деструктор нужен.



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

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

Наверх




Память: 0.44 MB
Время: 0.007 c
1-95867
Dick
2002-08-17 12:11
2002.08.29
Вопрос на который в Delphi Help я не нашел ответа


3-95691
Nazareth
2002-08-08 16:01
2002.08.29
Странная закладка


4-96032
giokoedlogin
2002-06-27 18:16
2002.08.29
как мне перехватить нажатие клавы


6-95921
Nikollay
2002-06-20 18:59
2002.08.29
Как уменьшить размер пакета протокола FTP?


4-96018
z0ne
2002-06-26 12:42
2002.08.29
Проблема с BeginPath





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