Ошибка линковщика: unresolved external

#include <vcl.h>
#pragma hdrstop
#include<stdlib.h>
#include "Unit1.h"
int Sort(int,int,int);
int Sort_2(int);
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
int x[8],i,j,flag,buf;
try
{
                x[0]=StrToInt(Edit1->Text);
            x[1]=StrToInt(Edit2->Text);
            x[2]=StrToInt(Edit3->Text);
                x[3]=StrToInt(Edit4->Text);
            x[4]=StrToInt(Edit5->Text);
            x[5]=StrToInt(Edit6->Text);
                x[6]=StrToInt(Edit7->Text);
            x[7]=StrToInt(Edit8->Text);
}
catch(EConvertError &e)
{
ShowMessage("Помилка початкових даних!");
return;
}
Memo1->Clear();
       switch(RadioGroup1 ->ItemIndex){
                case 0:
                Sort(x[7],7,0);
                Memo1->Lines->Add(" Отсортированный массив: ");
                for(i=0;i<8;i++)
                Memo1->Lines->Add(" "+IntToStr(x[i]));
                break;
                case 1:
                Sort_2(x[7]);
                Memo1->Lines->Add(" Отсортированный массив: ");
                for(i=0;i<8;i++)
                Memo1->Lines->Add(" "+IntToStr(x[i]));
                break;
        }
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
Form1->Close();
}
//---------------------------------------------------------------------------
 int Sort(int array[], int size, int i)
{
if (i < size - 1)
{
int min = array[i];
int index = i;
int temp;
for (int j = i; j < size; j++)
{
if (min > array[j])
{
min = array[j];
index = j;
}
}
temp = array[i];
array[i] = array[index];
array[index] = temp;
return Sort(array, size, i + 1);
}
else
return 0;
}
 
int Sort_2(int x[])
{
int i,j,flag,buf;
i=0;
do {
 flag=0;
 for(j=6;j>=i;j--)
 if(x[j]>x[j+1]) {
  buf=x[j];
  x[j]=x[j+1];
  x[j+1]=buf;
  flag=1;
  }
i++;
}
while(flag);
return 0;
}
//---------------------------------------------------------------------------

int Sort(int [], int , int)
int Sort_2(int [])

int Sort(int [], int , int)
int Sort_2(int [])

int Sort(int, int , int)
int Sort_2(int)

Sort(x[7],7,0);

Sort(x,7,0);