//--------------------------------------------------------------------------- #include #pragma hdrstop #include "FormularioREUSABLE.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma link "CoolForm" #pragma resource "*.dfm" TFormREUSABLE *FormREUSABLE; //--------------------------------------------------------------------------- __fastcall TFormREUSABLE::TFormREUSABLE(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TFormREUSABLE::Button1Click(TObject *Sender) { ModalResult = mrCancel; } //---------------------------------------------------------------------------