lc_bcb_73.html

来自「C++Builder教学大全」· HTML 代码 · 共 23 行

HTML
23
字号


<HTML><HEAD>

<TITLE>拷屏代码</TITLE>

<META content="text/html; charset=gb2312" http-equiv=Content-Type>

<META content=zyqsj name=Author>

<META content="Microsoft FrontPage 4.0" name=GENERATOR></HEAD>

<BODY >

<p align="center"><b><font size="5">拷 屏 代 码</font></b>   

<P>TCanvas *dtCanvas = new TCanvas; <BR>dtCanvas-&gt;Handle=GetDC(0);   

<P>Graphics::TBitmap *bitmap=new Graphics::TBitmap; <BR>bitmap-&gt;Width=Width;   

<BR>bitmap-&gt;Height=Height;   

<P>int nColors=GetDeviceCaps(Canvas-&gt;Handle,SIZEPALETTE); <BR>LOGPALETTE*   

logPal=(LOGPALETTE*)new   

Byte[sizeof(LOGPALETTE)+(nColors-1)*sizeof(PALETTEENTRY)];   

<BR>logPal-&gt;palVersion=0x300; logPal-&gt;palNumEntries=(Word)nColors;   

<BR>GetSystemPaletteEntries(Canvas-&gt;Handle,0,nColors,logPal-&gt;palPalEntry);   

<BR>bitmap-&gt;Palette=CreatePalette(logPal); <BR>delete[] logPal;   

<P>TRect src=BoundsRect; <BR>TRect dest=Rect(0,0,Width,Height);   

<BR>bitmap-&gt;Canvas-&gt;CopyRect(dest,dtCanvas,src);   

<P>bitmap-&gt;SaveToFile("Screen.bmp");   

<P>delete bitmap; <BR>delete dtCanvas; <BR>&nbsp; <BR>&nbsp; <BR>&nbsp;   

</P></BODY></HTML>  

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?