gestionar eventos de componente dinamico

[ecfisa]

Empezado por aguml

pues mi duda es que si por ejemplo creo un boton usando new ¿Como controlo sus eventos para que por ejemplo al pulsar el boton se ejecute un codigo. Un ejemplo por favor. El componente que estoy usando no es visual, su owner es null, y lo creo en un hilo pero supongo que será igual.

Hola aguml.

Ejemplo:

.h

...
class TForm1 : public TForm
{
...
private:
  void __fastcall btClick(TObject *Sender);
...

.cpp

...
void __fastcall TForm1::btClick(TObject *Sender)
{
  ShowMessage("Click");
}


void __fastcall TForm1::FormCreate(TObject *Sender)
{
  TButton *bt = new TButton(this);
  bt->Name = "btNew";
  bt->Caption = "Nuevo";
  bt->Top  = 10;
  bt->Left = 10;
  bt->OnClick = btClick;
  bt->Parent = this;
}

Saludos