Вниз
Скачать: CL | DM;

Конструктор и деструктор в компоненте   Найти похожие ветки 

← →
Kir68   (2003-03-05 10:49) [0]

Уважаемые мастера.
Пишу компонент.
В компоненте есть свойство типа pointer (без него никак не получается) В процессе работы компонента память для этого указателя то выделяется то освобождается. Нужно чтобы при создании компонента ему присваивался nil, а при удаления компонента память точно освобождалась.
Я написал конструктор и деструктор. Проинсталировал компонент, но когда бросаешь его на форму ничего не происходит. Среда не добавляет компонента в форму, т.е. на экране он есть, а в .dfm ничего нет, нет и в описании обекта tForm1. Убираешь обе процедуры все начинает работать.

Подскажите как либо правильно написать конструктор с деструктором, либо что делать с указателями, чтобы память точно освобождалась.

public
constructor Create(AOwner: TComponent); override;
destructor Destroy; override;

constructor tBtrvApi.Create(AOwner: TComponent);
begin
inherited Create(Owner);
DataBuf:=nil;
KeyBuf:=nil;
end;
{*************************************************************}
destructor tBtrvApi.Destroy;
begin
if DataBuf<>nil then
begin
FreeMem(DataBuf);
DataBuf:=nil
end;
if KeyBuf<>nil then
begin
FreeMem(KeyBuf);
KeyBuf:=nil
end;
inherited Destroy;
end;


← →
Feofan ©   (2003-03-05 11:30) [1]

весь код класса покажи :)


← →
Anatoly Podgoretsky ©   (2003-03-05 11:33) [2]

Что такое DataBuf и KeyBuf
и что такое tBtrvApi


← →
AlexSV ©   (2003-03-05 11:54) [3]

Возможно в конструкторе надо
...
inherited Create( A Owner);
...


← →
Feofan ©   (2003-03-05 11:55) [4]

AlexSV глазастый какой 8-)


← →
Anatoly Podgoretsky ©   (2003-03-05 12:08) [5]

AlexSV © (05.03.03 11:54)
Вероятно там нужен просто inherited;


← →
Kir68   (2003-03-05 13:46) [6]

Спасибо!
Нужно было aOwner


← →
Юрий Зотов ©   (2003-03-05 16:07) [7]

> Kir68

Если DataBuf и KeyBuf - поля компонента, то ТАКОЙ конструктор ВООБЩЕ не нужен. Уберите его. Поля и без него будут NIL.



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.015 c
14-54283
Melbis
2003-02-28 16:17
2003.03.17
Приличная таблица на делфи?


14-54301
Злодей
2003-02-28 22:24
2003.03.17
Компоненты...


14-54269
Stas
2003-02-28 14:14
2003.03.17
Конструктор запросов


14-54287
pipl
2003-02-27 18:07
2003.03.17
Куда подевался OnClientRead?


3-53907
АндрейБ
2003-02-25 17:24
2003.03.17
SQL -> массив




   Наверх