http://c.chinaitlab.com/CCBuilder/200805/747197.html
TCanvas *dtCanvas = new TCanvas;
dtCanvas->Handle=GetDC(0);
Graphics::TBitmap *bitmap=new Graphics::TBitmap;
bitmap->Width=Width;
bitmap->Height=Height;
int nColors=GetDeviceCaps(Canvas->Handle,SIZEPALETTE);
LOGPALETTE* logPal=(LOGPALETTE*)new Byte[sizeof(LOGPALETTE)+(nColors-1)*sizeof(PALETTEENTRY)];
logPal->palVersion=0x300; logPal->palNumEntries=(Word)nColors;
GetSystemPaletteEntries(Canvas->Handle,0,nColors,logPal->palPalEntry);
bitmap->Palette=CreatePalette(logPal);
delete[] logPal;
TRect src=BoundsRect;
TRect dest=Rect(0,0,Width,Height);
bitmap->Canvas->CopyRect(dest,dtCanvas,src);
bitmap->SaveToFile(\"Screen.bmp\");
delete bitmap;
delete dtCanvas;
分享到:
相关推荐
代码为bcb2010编写。主要能给习惯拖控件的写程序的人带来一些面向对象设计的概念。
bcb2010 屏幕任意区域抓图 并保存为jpg
二维魔方 BCB 源代码 C++ 二维魔方 BCB 源代码 C++
使用它,你可以统计 Delphi、BCB工程及工程组,VB工程所有代码文件的行数,并可将结果输出为文本或导出到Excel表,你只需选择一个工程或工程组文件即可! RowCounter 中可能有不少对初学者有用的小技巧,如 ListView...
用bcb源代码编写自己定制的excel文件,可设置表格格式 字体 表头 标题等等。
BCB源代码:系统与窗体
OPC bcb 程序代码(opc协议 opc-server)
BCB 环境下的 自动关机程序 代码 好像运行 不太理想
1、BCB屏幕监视算法 2、TCP接收及发送
这是bcb基础学习的源代码,很详细!非常有用
扫雷游戏(含BCB源码) // 其实很早就写过一个pascal版本的扫雷游戏,很简陋的,觉得不太好,正好工作的时候 // 用到BCB,就想写一个BCB版本的扫雷游戏,其实就是自己写着玩玩. // 从开始写到写完,间隔很久,中间...
自己公司开发的用于工厂各个工序工时统计的前台应用程序,后台是用的SQL2000...内容是完整版本的没有少一个文件,有很高的编程实战参考价值;我觉得这么完整的给100分是绝对值了,可惜最高只能是10分,那就10分吧。
这是源代码,下载后需要修改工程的include和lib方可使用
用BCB简单实现的全屏半透窗口的,编译运行 OK
点击listView直接可编辑的BCB代码实列
公历转农历的BCB代码。 公历与农历转换函数,定义了一个ConvDate类。 可以完成1932--2031年之间的转换。
很多情况下我们经常需要鼠标键盘无动作时自动关机的操作。 我利用屏幕保护来控制计算机关机操作。 原理: 先用 Borland c++ Builder2009 制作了一个关机的程序“关机.exe” 然后直接把 exe 文件改为 scr 屏幕保护...
用BCB2010开发的ftp上传下载源代码
bcb串口mscomm控件错误编译运行错误修复工具集合c++builder