http://www.csdn.net/Expert/topic/491/491272.shtm .

[workhardfu]

http://www.csdn.net/Expert/topic/491/491272.shtm

[superaf]

void ComGetScreenServ::SnapScreen()
{
RECT r;
GetWindowRect(GetDesktopWindow( ),&r);
TCanvas *Canvas0=new TCanvas;
Canvas0->Handle=GetDC(0);
Graphics::TBitmap *bitmap=new Graphics::TBitmap( );
bitmap->Height=r.bottom;
bitmap->Width=r.right;
bitmap->Canvas->CopyRect(r,Canvas0,r);
delete Canvas0;
TJPEGImage* Screen = new TJPEGImage();
Screen->CompressionQuality=50; // 失真度
Screen->Assign(bitmap);
delete bitmap;
Screen->SaveToStream(JpegStream);
JpegStream->Position = 0;
delete Screen;
}