Скриншот на OpenGL (2 стр)

void MakeShot( int dest,int x,int y,int w,int h ){
  glBindTexture(GL_TEXTURE_2D, dest);
  glCopyTexImage2D(GL_TEXTURE_2D,0,GL_RGB,x,y+h,w,h,0);
}

     ILint w=0,h=0,n=0;

     glGetTexLevelParameteriv(GL_TEXTURE_2D,0,GL_TEXTURE_WIDTH,&w);
     glGetTexLevelParameteriv(GL_TEXTURE_2D,0,GL_TEXTURE_HEIGHT,&h);
     glGetTexLevelParameteriv(GL_TEXTURE_2D,0,GL_TEXTURE_COMPONENTS,&n);

     ILint bpp=0;
     if (n==IL_RGBA||n==IL_BGRA)
       bpp=4;
     else
       if (n==IL_RGB||n==IL_BGR)
         bpp=3;
       else
         bpp=1;
     
     unsigned char* temp=new unsigned char[w*h*bpp];

     glGetTexImage(GL_TEXTURE_2D,0,n,GL_UNSIGNED_BYTE,temp);

MakeShot(dest_tex,0,0,512,512);

//где dest_tex предварительно созданная текстура

procedure screenOpGl(TData:string);
var                                      
  Bmp: Graphics.TBitmap;  
  jpeg: TJpegImage;          
  i, j: integer;                     
  screenshot:array of byte;
  x,z: integer;                      
begin
      JPEG:=TJPEGImage.Create;
      Bmp:=TBitmap.Create;       
      bmp.Height:=screen.Height;
      bmp.Width:=screen.Width;  
    x:=bmp.Width;                
    z:=bmp.Height;               
{================================================================}
    glPixelStorei(GL_PACK_ALIGNMENT,4);   
    glPixelStorei(GL_PACK_ROW_LENGTH,0);
    glPixelStorei(GL_PACK_SKIP_ROWS,0);
    glPixelStorei(GL_PACK_SKIP_PIXELS,0);
{================================================================}
    setlength(screenshot, x*z*4);
    glReadBuffer(GL_front);
    glReadPixels(0,0,x,z,              
        GL_rgb,                        
        GL_UNSIGNED_byte,  
        screenshot);               

    Bmp.PixelFormat:=pf32bit;
    Bmp.SetSize(x,z);           
{================================================================}
    for i:=0 to z-1 do            
      for j:=0 to x-1 do          
        Bmp.Canvas.Pixels[i, j]:=rgb(screenshot[(i*x + j)*4 + 0],
                                 screenshot[(i*x + j)*4 + 1],
                                 screenshot[(i*x + j)*4 + 2]);
{================================================================}
    JPEG.Assign(bmp);          
    JPEG.CompressionQuality := 20;
    JPEG.Compress;                
    JPEG.SaveToFile('c:\tmp\'+tdata+'.jpg');
    JPEG.Free;                              
    Bmp.Free;

end;

void MakeScreenShot()
{
  unsigned char *output = 0;
 
  output = new unsigned char[SCREEN_WIDTH * SCREEN_HEIGHT * 3];
 
  glReadPixels(0,0, SCREEN_WIDTH, SCREEN_HEIGHT, GL_RGB, GL_UNSIGNED_BYTE,
          output);
 
  FILE *sFile = 0;
 
  unsigned char tgaHeader[12] = {0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0};
  unsigned char header[6];
  unsigned char bits = 0;
  int colorMode = 0;
  unsigned char tempColors = 0;
 
  sFile = fopen("Screen.tga", "wb");
 
  if(!sFile){
    MessageBox(NULL, "Can't open ScreenShot File!","Error",MB_OK);
    return;
  }

  colorMode = 3;
  bits = 24;
 
  header[0] = SCREEN_WIDTH % 256;
  header[1] = SCREEN_WIDTH / 256;
  header[2] = SCREEN_HEIGHT % 256;
  header[3] = SCREEN_HEIGHT / 256;
  header[4] = bits;
  header[5] = 0;

  fwrite(tgaHeader, sizeof(tgaHeader), 1, sFile);
  fwrite(header, sizeof(header), 1, sFile);
 
  for(int i=0; i < SCREEN_WIDTH * SCREEN_HEIGHT * colorMode; i+=colorMode)
  {
    tempColors = output[i];
    output[i] = output[i+2];
    output[i+2] = tempColors;
  }
 
  fwrite(output, SCREEN_WIDTH * SCREEN_HEIGHT * colorMode, 1, sFile);
 
  fclose(sFile);
  delete[] output;
}