Конструктор и деструктор в компоненте

← →
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

> Kir68

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

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