Bitmap2->PixelFormat = pf24bit;
 Byte* ptr;
 for(int y=0;yScanLine[y];
   for(int x=0;x=0)&&
       (Bitmap1xWidth)&&
       (Bitmap1y>=0)&&
       (Bitmap1yHeight))
    {
       ptr[x*3]  =GetBValue(Bitmap1->Canvas->Pixels[Bitmap1x][Bitmap1y]);
       ptr[x*3 1]=GetGValue(Bitmap1->Canvas->Pixels[Bitmap1x][Bitmap1y]);
       ptr[x*3 2]=GetRValue(Bitmap1->Canvas->Pixels[Bitmap1x][Bitmap1y]);
    }
   }
 }