Aby po klikniÄ™ciu przycisku Button1 caÅ‚y obszar formularza (pasek tytuÅ‚u, menu, obszar użytkownika i suwaki) zostaÅ‚ zapisany do pliku jako bitmapa tworzymy w funkcji obsÅ‚ugujšcej zdarzenie OnClick przycisku Button1 nowy obiekt typu TBitmap (bitmapa), wywoÅ‚ujemy funkcjÄ™ Windows API CreateCompatibleBitmap(), która tworzy bitmapÄ™ zwišzanš z tzw. kontekstem urzšdzenia, podajšc jako argumenty uchwyt do kontekstu urzšdzenia (u nas do caÅ‚ego obszaru formularza), szeroko?ć i wysoko?ć bitmapy w pikselach, nastÄ™pnie funkcjš Windows API BitBlt() kopiujemy zawarto?ć kontekstu urzšdzenia do bitmapy FormBitmap i zapisujemy jš do pliku funkcjš SaveToFile podajšc jako argument ?cieżkÄ™ dostÄ™pu do pliku (należy zwrócić uwagÄ™ na podwójny backslash oddzielajšcy katalogi):
Unit1.cpp
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Graphics::TBitmap *FormBitmap = new Graphics::TBitmap();
FormBitmap->Handle = CreateCompatibleBitmap(GetWindowDC(Handle), Width, Height);
BitBlt(FormBitmap->Canvas->Handle, 0, 0, FormBitmap->Width, FormBitmap
->Height,GetWindowDC(Handle), 0, 0, SRCCOPY);
FormBitmap->SaveToFile("c:\\canvas.bmp");
delete FormBitmap;
}
Wyszukiwarka
Podobne podstrony:
A Zapis do(C64zapis liczbo do tekstowego w kolumnie Xpozwol mi przyjsc do ciebiewytyczne do standar przyl4FAQ Komendy Broń (Nazwy używane w komendach) do OFPDrzwi do przeznaczenia, rozdział 253$2403 specjalista do spraw szkolenDo W cyrkulacja oceaniczna II rokpowod do rozwodu (2)więcej podobnych podstron