Hola Gente !!!
Les paso lo que he probado hasta ahora y cuales son los comentarios que tengo al respecto.
Si yo compilo este codigo el error devuelto por builder es :
[C++ Error] Unit1.cpp[30]: E2316 '__fastcall TForm1::SenalClick(TObject *)' is not a member of 'TForm1'
[C++ Error] Unit1.cpp[52]: E2451 Undefined symbol 'SenalClick'
Y como notarán he comentado la linea "this->InsertControl(Boton);" porque cuando luego de clickear el boton que ejecuta el código de abajo
sin ningún problema aparente, ( aparece en Panel1 el boton !!), y finalizo el programa aciendo click en un boton "Salir" ( Close()
salta un error que dice algo así como que no se destruyó bla bla y algún otro problema de memoria ! y todo se interrumpe.
Espero comentarios .... me voy a poner un casco je je je je
bye
//---------------------------------------------------------------------------
// Funcion de evento creada por mi !!!!
void __fastcall TForm1::SenalClick(TObject *sender)
{
ShowMessage("Prueba exitosa");
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
//Crear Control
TButton *Boton = new TButton(this);
//Posicionarlo al componente en Panel1
Boton->Left=Panel1->Width/2;
Boton->Top=Panel1->Height/2;
//Dimensiones
Boton->Height=89;
Boton->Width=89;
Boton->Name="Bot";
//Va a estar dentro del Panel 1
Boton->Parent=Panel1;
//incluyo el componente a la lista de componentes del TForm en cuestion
// this->InsertControl(Boton);
Boton->OnClick = SenalClick;
Button1->Enabled=false;
}
//---------------------------------------------------------------------------