//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
#include "stdio.h"
int a[10][10];
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::FormCreate(TObject *Sender)
{
 FILE *f;
 if(f=fopen("C:\\111.txt","r"))
 {
   for(int i=0;i<10;i++)
   {
   for(int j=0;j<11;j++)  // на единицу больше из-за символа конца строки
   {
    char t=fgetc(f);
    switch(t)
    {
    case 48 : a[i][j]=0; break;
    case 49 : a[i][j]=1; break;
    }
   }
   }
 }
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormPaint(TObject *Sender)
{
   for(int i=0;i<10;i++)
   {
   for(int j=0;j<10;j++)
   {
    switch(a[i][j])
    {
      case 0 : Form1->Canvas->Brush->Color=clRed; break;
      case 1 : Form1->Canvas->Brush->Color=clGreen; break;
    }
    Form1->Canvas->Rectangle(i*30,j*30,i*30+30,j*30+30);  // 30 = размер клетки в пикселях
   }
   }
}
//---------------------------------------------------------------------------