Коректно закрыть вкладку

← →
SKIPtr (2008-10-30 11:20) [0]

Я пишу программу где имеется PageControl в котором будут динамические страницы
В поисковике нашел много примеров как добавить вкладку TabSheet := TTabSheet.Create(Self);
на нее можно установить компоненты TButton.Create(Self)
но созданую вкладку может понадобиться удалять
как сделать это коректно чтоб произошло полное освобождение памяти которое было взято для вкладки

← →
Сергей М. © (2008-10-30 11:22) [1]

Смотря кто такой Self ..

← →
SKIPtr (2008-10-30 11:31) [2]

Но Self чаще всего это Form1 а что должно быть
и как закрыть чтоб при закрытии удалились TabSheet и Button

← →
b@v © (2008-10-30 11:38) [3]

TabSheet.Free; Button.Free;

← →
Сергей М. © (2008-10-30 11:43) [4]

> Self чаще всего это Form1

Self - это Self.

Self - это конкретно тот объект (или класс), метод которого выполняется в тек.момент.

Сделай так:

MyTabSheet := TTabSheet.Create(Self);
MyTabSheet.PageControl := MyPageControl;
MyButton := TButton.Create(Self);
MyTabSheet.InsertControl(MyButton);

> как закрыть чтоб при закрытии удалились TabSheet и Button

Форма при своем уничтожении автоматически уничтожит PageControl, поскольку форма является владельцем PageControl.

PageControl при своем уничтожении, в свою очередь, автоматически уничтожит все TabSheet"ы, поскольку PageControl является их владельцем.

TabSheet при своем уничтожении, в свою очередь, автоматически уничтожит Button, поскольку TabSheet является его владельцем.

Так что никаких доп.телодвижений делать не надо, достаточно вызвать деструктор формы.

для полной гарантии

MyButton := TButton.Create(MyTabSheet);

Коректно закрыть вкладку Найти похожие ветки