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

Вниз

Обязательно ли писать свой деструктор в таком случае?   Найти похожие ветки 

 
SP   (2009-03-28 16:48) [0]

Есть такой класс:
type
 TFrmErrList = class(TForm)
   ...
   PnlErr: TPanel;
   ...
   constructor Create(AOwner:TComponent;var ErrArray:AErrArray); reintroduce; overload;
...


Конструктор имеет такой вид:

constructor TFrmErrList.Create(AOwner:TComponent;var ErrArray:AErrArray);
var
 i:integer;
 ...
begin
 inherited Create(AOwner);
 for i:=0 to high(ErrArray) do
   begin
     with TLabel.Create(PnlErr) do
...


т.е. там создается еще куча TLabel.

Вопрос: Обязательно ли мне сохранять указатели на созданные TLabel, чтобы их потом уничтожить в деструкторе?
Или тут не обязательно переписывать деструктор?


 
Palladin ©   (2009-03-28 16:52) [1]

нет конечно...


 
{RASkov} ©   (2009-03-28 16:52) [2]

> [0] SP   (28.03.09 16:48)

Лабелы прибьются PnlErr: TPanel, а вот кто прибьет PnlErr?


 
Palladin ©   (2009-03-28 16:53) [3]

никто :) он даже не создается :)


 
SP   (2009-03-28 17:05) [4]


>
> Лабелы прибьются PnlErr: TPanel, а вот кто прибьет PnlErr?
>


> Palladin ©   (28.03.09 16:53) [3]
>
> никто :) он даже не создается :)


он создается... Не знаю как правильно выразится, но он в designtime на форму положен...


 
Eraser ©   (2009-03-28 17:15) [5]

> [4] SP   (28.03.09 17:05)


> положен...

если положен, то все нормально.



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

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

Наверх





Память: 0.45 MB
Время: 0.005 c
15-1236461409
Юрий
2009-03-08 00:30
2009.05.10
С днем рождения ! 8 марта 2009 воскресенье


2-1237878631
sc0rp
2009-03-24 10:10
2009.05.10
Проблема с созданием окна(CreateWindow) в отдельном потоке


2-1238240264
Showmessage
2009-03-28 14:37
2009.05.10
Использование БД


15-1236616818
Кое кто
2009-03-09 19:40
2009.05.10
Futronic - Finger Print Scanner


15-1236632358
Nic
2009-03-09 23:59
2009.05.10
Nic





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