Динамическая привязка событий и удаление объектов

[Armagedo]

Быть добру!

С формами и прочими контролами, кроме фоксовских, не работал.

Решил тут покрутить извилины на билдере, что оно да как.
Есть давно писаный для себя на С++ класс для работы с матрицами.
Захотелось потренироваться на кошках и всё это дело слегка "визуализировать" в меру собственных сил.

Начал с осторожных шагов и сходу застрял.

Есть главная форма (TmfTestForm *mfTestForm).
На ней кнопка (TButton *Button1).
По нажатию создаем динамически новую "вспомогательную" форму (TForm *matrixForm) и на ней editbox (TEdit *cellEdit).

Потом прячем главную форму и показываем вспомогательную matrixForm.

Тут и начали возникать вопросы.

Вопрос 1:
По закрытии вспомогательной формы нужно отобразить главную форму.
Объясните, почему к событию OnClose удается прикрутить функцию-обработчик (FormClose), только сделав её членом класса главной формы?

Пробовал отдельной функцией - ругается на невозможность приведения там чего-то к чему-то...
Пришлось закомментить до поры до времени (см. заголовочный)

Вопрос 2:
Раз создавал форму и контрол динамически, то, как мне казалось, нужно и поубивать явно при закрытии вспомогательной формы.
Для простоты эксперимента переменные-указатели объявлены глобальными (???), но...

При попытке освобождения через delete получаю критическую ошибку Access violation at address 00000000. Read ...

Что-то не могу найти зацепок почему...то ли их до этого уже поубивало...но что и когда....

Не в службу - гляньте да посоветуйте, что не так

ЗС

 Заголовочный

//---------------------------------------------------------------------------

#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <msxmldom.hpp>
#include <XMLDoc.hpp>
#include <xmldom.hpp>
#include <XMLIntf.hpp>
#include <Grids.hpp>
//---------------------------------------------------------------------------
class TmfTestForm : public TForm
{
__published:	// IDE-managed Components
        TButton *Button1;
        void __fastcall Button1Click(TObject *Sender);
        void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
private:	// User declarations
public:		// User declarations
        __fastcall TmfTestForm(TComponent* Owner);
};
//---------------------------------------------------------------------------
//void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
//---------------------------------------------------------------------------
extern PACKAGE TmfTestForm *mfTestForm;
//---------------------------------------------------------------------------


#endif

и

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TmfTestForm *mfTestForm;
TForm *matrixForm;
TEdit *cellEdit;

//---------------------------------------------------------------------------
__fastcall TmfTestForm::TmfTestForm(TComponent* Owner)
        : TForm(Owner)
{
}
//-------------------------------------------------------

void __fastcall TmfTestForm::Button1Click(TObject *Sender)
{
        mfTestForm->Visible = false;

        matrixForm = new TForm(Application);
        matrixForm->Left = 200;
        matrixForm->Top = 200;
        matrixForm->Height = 200;
        matrixForm->Width = 400;
        matrixForm->OnClose = mfTestForm->FormClose;

        cellEdit = new TEdit(matrixForm);
        cellEdit->Parent = matrixForm;
        cellEdit->Left = 15;
        cellEdit->Top = 15;
        cellEdit->Width = 40;
        cellEdit->Height = 20;
        cellEdit->Visible = true;

        matrixForm->Show();
}

//---------------------------------------------------------------------------
void __fastcall TmfTestForm::FormClose(TObject *Sender, TCloseAction &Action)
{
        delete matrixForm;
        delete cellEdit;
        this->Visible = true;
}

[Armagedo]

Вопрос номер 2 СНИМАЮ

Индеец - что поделать.
Сначала "освобождаю" форму, а потом пытаюсь освободить контрол, для которого форма является "родительской".

Может деструктор ~TForm() сам освобождает память, "занятую" всеми контролами на этой форме?

Вообщем, махнул местами два делита - ошибка пропала.

Вопрос номер 1 - остался

[FataLL]

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

[koka123]

void __fastcall TForm1::btn1Click(TObject *Sender)
{
std::auto_ptr<TForm2> newForm(new TForm2(Application));
this->Visible=false;
__try
{
newForm->ShowModal();
}
__finally
{
this->Visible=true;
}
}
//---------------------------------------------------------------------------