Someone

//---------------------------------------------------------------------------#include <vcl.h>#pragma hdrstop#include "Unit1.h"//---------------------------------------------------------------------------#pragma package(smart_init)#pragma resource "*.dfm"TForm1 *Form1;//---------------------------------------------------------------------------__fastcall TForm1::TForm1(TComponent* Owner)	: TForm(Owner){}//---------------------------------------------------------------------------void __fastcall TForm1::FormDestroy(TObject *Sender){	for (int x=0; x < 8; x++)		for (int y=0; y < 8; y++)			DeleteObject(o[x][y]);}//---------------------------------------------------------------------------void __fastcall TForm1::FormPaint(TObject *Sender){	Canvas->Draw(0,0,b);}//---------------------------------------------------------------------------void __fastcall TForm1::FormMouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift,          int X, int Y){	for (int x=0; x < 8; x++)		for (int y=0; y < 8; y++)			if(PtInRegion(o[x][y],X,Y))				InvertRgn(b->Canvas->Handle,o[x][y]);	InvalidateRect(Handle, NULL, FALSE);}//---------------------------------------------------------------------------void __fastcall TForm1::FormCreate(TObject *Sender){	b=new Graphics::TBitmap;	b->LoadFromResourceID((int)HInstance, 100);	ClientWidth=b->Width;	ClientHeight=b->Height;	for (int x=0; x < 8; x++)		for (int y=0; y < 8; y++)			o[x][y]=CreateRectRgn(2+49*x,2+49*y,49*(x+1),49*(y+1));}//---------------------------------------------------------------------------