[bcc32 Error] Unit4.cpp(53): E2451 Undefined symbol 'label3'

//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
#include "Unit4.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
 int n,x;
 double d[m][m];
TForm4 *Form4;
void RazmerNStrG(int n, TStringGrid *StrG, AnsiString st){//формирование размерности таблицы
 StrG->ColCount=n+1; // Количество колонок таблицы =n+1
 StrG->RowCount=n+1; // Количество строк таблицы  =n+1
 StrG->Cells[0][0]=st; //Двумерный массив, самая левая, верхняя ячейка таблицы
 for (int i=0; i<=n; i++){
    StrG->Cells[i][0]= IntToStr(i);
    StrG->Cells[0][i]= IntToStr(i);
          }
 }
 void inputM (int n, double d[m][m], TStringGrid *StrG)//Ввод матрицы а размера n*n из таблицы StrG
 {int i,j;
 for (i=0; i<n; i++)
 for (j=0; j<n; j++)
 d[i][j]=StrToFloat (StrG->Cells[j+1][i+1]);
 }
 void umn(int n, double d[m][m],int x) //Умножение матриц размера n*n A*B->C
 {
 int i,j;
 for (i=0;i<n;i++)
 for (j=0;j<n;j++){
 d[i][j]*=x;
    }
 }
 void summ (double d[m][m],double y[m])  //Сложение столбцов
 {
 int i,j;
 for (j=0;j<n;j++){
 y[j]=0;
 for (i=0;i<n;i++){
 y[j]+=d[i][j];
        }
    }
 }
 void max(int Y, double y[m]){
 Y=y[0];
    for(int j=0;j<n;j++){
        if(y[j]>Y){
        Y=y[j];
        }
    }
 
   label3->Caption = IntToStr(Y);
 }
//---------------------------------------------------------------------------
__fastcall TForm4::TForm4(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm4::Button1Click(TObject *Sender)
{
n=StrToInt(Edit1->Text);
RazmerNStrG(n,StringGrid1,"d");
}
//---------------------------------------------------------------------------
void __fastcall TForm4::Button2Click(TObject *Sender)
{
 void inputM (int n, double d[m][m], TStringGrid *StrG);
}
void __fastcall TForm4::Button3Click(TObject *Sender)
{
  x=StrToInt(Edit2->Text);
  void umn(int n, double d[m][m],int x);
}
void __fastcall TForm4::Button4Click(TObject *Sender)
{
 
 
    void summ (double d[m][m],double y[m]);
    void max(int Y, double y[m]);
}

//---------------------------------------------------------------------------
 
#ifndef Unit2H
#define Unit2H
//---------------------------------------------------------------------------
#include <System.Classes.hpp>
#include <Vcl.Controls.hpp>
#include <Vcl.StdCtrls.hpp>
#include <Vcl.Forms.hpp>
#include <Vcl.Grids.hpp>
//---------------------------------------------------------------------------
class TForm2 : public TForm
{
__published:    // IDE-managed Components
    TStringGrid *StringGrid1;
    TStringGrid *StringGrid2;
    TStringGrid *StringGrid3;
    TButton *Button1;
    TButton *Button2;
    TButton *Button3;
    TButton *Button4;
    TButton *Button5;
    TEdit *Edit1;
    void __fastcall Button1Click(TObject *Sender);
    void __fastcall Button2Click(TObject *Sender);
    void __fastcall Button3Click(TObject *Sender);
    void __fastcall Button5Click(TObject *Sender);
    void __fastcall Button4Click(TObject *Sender);
private:    // User declarations
public:     // User declarations
    __fastcall TForm2(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm2 *Form2;
//---------------------------------------------------------------------------
const int m=5;
void RazmerNStrG(int n, TStringGrid *StrG, AnsiString st); //Функция, задающая размер таблицы
void inputM(int n, double a[m][m], TStringGrid *StrG); //Функция ввода массива m*m из таблиц
void outputM(int n, double a[m][m], TStringGrid *StrG); //Функция вывода массива на таблицу
void umnM(int n, double a[m][m], TStringGrid *StrG); //Функция умножения матриц(массивов "a" и"b"
#endif

Form4->label3->Caption = IntToStr(Y);

void Form4::max(int Y, double y[m])

void max(int Y, double y[m]);