Graphics::TBitmap *Bmp1  = new Graphics::TBitmap();
 Graphics::TBitmap *Bmp2  = new Graphics::TBitmap();
 byte *ptr;
 Bmp1->LoadFromFile("C:\\test\\test.bmp");     Bmp2->Height=Bmp1->Height;
 Bmp2->Width=Bmp1->Width;
 Bmp2->PixelFormat=pf24bit;     int IrisString_length=Bmp1->Width;
 int *IrisString=new int[pow(IrisString_length,2)];
 for(int j=0; jScanLine[j];
     for(int i=0; iScanLine[j];
     for(int i=0; iImage1->Picture->Bitmap=Bmp2;