⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 bcb_g14.htm

📁 C++Builder教学大全
💻 HTM
字号:
 

<html>

<head>

<title>拷屏代码</title>

<meta http-equiv="目录类型" content="文本/html; 字符集=gb2312">

</head>

<body bgcolor="#FFFFFF">

<table width="100%" border="0" height="285">

  <tr> 

    <td height="35"> 

      <div align="center" class="p14"><font color="#000000">拷 屏 代 码</font></div> 

    </td> 

  </tr> 

  <tr valign="top">  

    <td>

      <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; </p> 

      </td> 

  </tr> 

</table> 

<br> 

</body> 

</html> 

⌨️ 快捷键说明

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