Наследование TButton

//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
#include "KoeficientOb.cpp"
#include "KolyVv.cpp"
#include "CrAr.cpp"
#include "Button2.cpp"
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
KoeficientOb *Koef;
KolyVv *Koly;
CrAr *Crarr;
TButton2 *button;
 
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
        KoeficientOb *Koef= new KoeficientOb (Form1);
        Koef->Parent = Form1;
        Koef->Left=50;
        Koef->Top=160;
 
        KolyVv *Koly= new KolyVv (Form1);
        Koly->Parent = Form1;
        Koly->Left=50;
        Koly->Top=100;
 
        CrAr *Crarr= new CrAr (Form1);
        Crarr->Parent = Form1;
        Crarr->Left=50;
        Crarr->Top=70;
 
        TButton2 *button= new TButton2 (Form1);
        button->Parent = Form1;
        button->Left=75;
        button->Top=40;
        button->Caption=("Рассчитать");
       // button->
 
 
 
}

void __fastcall TForm1::MyButtonClick(TObject *Sender);

button->OnClick = MyButtonClick;

KoeficientOb *Koef;
KolyVv *Koly;
CrAr *Crarr;
TButton2 *butto

        Koef= new KoeficientOb (Form1); 
        Koly= new KolyVv (Form1);
        Crarr= new CrAr (Form1);
        button= new TButton2 (Form1);

        KoeficientOb *Koef= new KoeficientOb (Form1);
        KolyVv *Koly= new KolyVv (Form1);
        CrAr *Crarr= new CrAr (Form1);
        TButton2 *button= new TButton2 (Form1);