О самоуничтожении объекта.

← →
ZeroDivide © (2005-09-27 15:30) [0]

Ситуация следующая. Есть форма которая динамически создает и показывает фрейм

procedure TfmTemplateFramed.ShowFrame(FrameClass: TfrmTemplateMainClass; Parent: TWinControl); ... FFrame := FrameClass.Create(Self); ... FFrame.Parent := Parent; ...

, предроложим что на форме ни каких контролов больше нет и у фрейма Align = alClient. Чтобы закрыть фрем, на нем лежит кнопка bClose

Теперь вопрос в том, как бы по клику на этой кнопке уничтожить фрейм?

← →
Desdechado © (2005-09-27 15:59) [1]

динамически присвой кнопке внешний обработчик, который считает Sender и освободит твой фрейм

← →
umbra © (2005-09-27 16:03) [2]

В обработчике нажатия кнопки

(bClose.Parent as TfrmTemplateMainClass).Close

← →
Игорь Шевченко © (2005-09-27 16:05) [3]

> Теперь вопрос в том, как бы по клику на этой кнопке уничтожить
> фрейм?

Повесить на фрейм обработчик сообщения CM_RELEASE и по клику на кнопке отправлять фрейму это сообщение, по аналогии с TCustomForm.Release.

В обработчике сообщения написать Free;

по аналогии с TCustomForm.Release
Угу... Я так и сделал. Похоже, единственный метод.

О самоуничтожении объекта. Найти похожие ветки