То что читал то не помогло! Не смог исправить ошибку

#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
#include "Unit2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
 
 
 
 
 
void __fastcall TForm1::N5Click(TObject *Sender)
{
 if(Form2->ComboBox1->Text == "Чеб21")
 {
 Client->Address = "10.20.123.58";
 Client->Port = 556;
 Client->Active = true;
 Client->Open() ;
 }
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::ClientConnect(TObject *Sender,
      TCustomWinSocket *Socket)
{
 
 Memo1->Lines->Add("Вы присоеденились ;");
}
void __fastcall TForm1::ClientRead(TObject *Sender,
      TCustomWinSocket *Socket)
{
 Memo1->Lines->Add(Client->Socket->ReceiveText());
 }
//---------------------------------------------------------------------------
 
 
void __fastcall TForm1::N6Click(TObject *Sender)
{
Form2->Show();
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
if (Client->Active == false)
{
Memo1->Lines->Add("Вы даже не подключились к серверу! Как вы можете отправить сообщение ????");
if (Edit1->Text == "")
{
Memo1->Lines->Add("Пожалуйста не отправляйте пустые сообщения!");
}
}
Form1->Client->Socket->SendText(Form2->Edit1->Text + Edit1->Text);
}
//---------------------------------------------------------------------------

[C++ Error] Unit1.cpp(44): E2316 '_fastcall TForm1::ClientRead(TObject *,TCustomWinSocket *)' is not a member of 'TForm1'

void _fastcall ClientRead(TObject *,TCustomWinSocket *);

void _fastcall ClientRead(TObject *,TCustomWinSocket *)
{
 Form1->Memo1->Lines->Add(Form1->Client->Socket->ReceiveText());
 }

void __fastcall TMainControl::TCPServerExecute(TIdContext *AContext)

String PeerInfo = AContext->Binding->PeerIP + ":" + IntToStr(AContext->Binding->PeerPort;

AContext->Connection->Socket->WriteLn("Message");