Data from the file (C++ Builder)

My file:

point1.txt

10 10 35 40

35 40 100 40

100 40 150 50

150 50 220 50

220 50 220 180

220 180 270 270

270 270 330 330

330 330 350 400

350 400 400 420

400 420 500 500

The program reads the data and writes it out. 

private: // User declarations

        int date_Point1[2][10];

        int date_Point2[2][10];

void __fastcall TForm1::FormCreate(TObject *Sender)

{

 int i;

 AnsiString text[4]={"X1","Y1","X2","Y2"};

 for(i=0;i<4;i++)

  StringGrid1->Cells[i][0]=text[i];

}

void __fastcall TForm1::Button1Click(TObject *Sender)

{

 int temp[4][10];

 int temp2[4*10];

 int temp3[4][10];

 int i,j,k;

 FILE *date;

 date=fopen("point1.txt","r");

 if(date==NULL)

 {

  ShowMessage("I can't open file");

  Close();

 }

 else

 {

  k=0;

  for(i=0;i<4;i++)

  {

   for(j=0;j<10;j++)

   {

    fscanf(date,"%d",&temp[i][j]);

    temp2[k]=temp[i][j];

    ++k;

   }

  }

  fclose(date);

 }

 k=0;

 i=0;

 do

 {

  for(j=0;j<4;j++)

  {

   temp3[i][j]=temp2[k];

   ++k;

   if(j==3)

    ++i;

  }

 }while(i<10);

 for(i=0;i<4;i++)

 {

  for(j=0;j<10;j++)

  {

   StringGrid1->Cells[i][j+1]=IntToStr(temp3[j][i]);

  }

 }

 for(i=0;i<10;i++)

 {

  for(j=0;j<2;j++)

  {

   date_Point1[j][i]=temp3[j][i];

   date_Point2[j][i]=temp3[j+2][i];

  }

 }

 PaintBox1->Canvas->MoveTo(date_Point1[0][0],date_Point2[0][0]);

 for(i=0;i<10;i++)

  for(j=0;j<2;j++)

   PaintBox1->Canvas->LineTo(date_Point1[j][i],date_Point2[j][i]);

}

void __fastcall TForm1::Button2Click(TObject *Sender)

{

 Close();

}