현재의 form을 통째로 이미지로 저장하려는데...
저장은 되기는 되는데... 원치 않는 from 밖의 바탕화면까지
저장되는데.. 왜 이런 현상이 일어나는지요?
void __fastcall TForm1::Button8Click(TObject *Sender)
{
Graphics::TBitmap *p = new Graphics::TBitmap;
HWND B = FindWindow ("TForm1", NULL );
if ( B )
{
p->Width = Form1->Width;
p->Height = Form1->Height;
p->PixelFormat = pf24bit;
BitBlt(p->Canvas->Handle,0,0,Form1->Width,Form1->Height,
Canvas->Handle ,Form1->Left,Form1->Top,cmSrcCopy);
}
p->SaveToFile("c:\\test.bmp");
delete p ;
}
|