Главная страница
    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.45 MB
Время: 0.01 c
1-95800
Butcher
2002-08-20 01:35
2002.08.29
TCanvas.RecText (Текст прижать к правом краю)


3-95663
Александр456
2002-08-08 10:05
2002.08.29
Еще вопрос по QuickReport


1-95806
ErmSergey
2002-08-20 09:29
2002.08.29
Определение позиции символа над которым находится указатель мыши


14-95951
Hellman
2002-08-03 20:10
2002.08.29
Win XP Style


1-95791
SetupOS
2002-08-19 21:21
2002.08.29
Как программно прокрутить RichEdit вверх, вниз…





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