自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+
  • 博客(4)
  • 收藏
  • 关注

转载 TGPBitmap转为TBitmap

TGBBitmap用在GDI+中,而TBitmap用在GDI中,有的时候,我们需要将它们进行转换,例如我们要将一个JPEG的图片的缩略图放到TBitmap中,这样它就可以很方便的被Windows中的多个控件所使用(如ImageList、Image等等控件)。        程序用DELPHI实现,使用了for Delphi 的GDI+接口函数,GDI+部分的代码可能与网上的不同

2015-03-20 13:40:46 812

转载 GDI+旋转图片的几种方法

1. 使用旋转矩阵POINT imgRotateCenterPos={10,10}; //旋转中心在图片坐标(相对于图片本身)CRect rcShow(imgShowRect); //图片要绘制的位置区域.//把 相对于图片的旋转中心坐标  转换为  绘制区域的坐标PointF centerPos(imgRotateCenterPos.x+rcShow.

2015-03-19 13:20:16 3299

转载 对word文档的操作

VarItemIndex :OleVariant;FileName, ConfirmConversions, ReadOnly, AddToRecentFiles,PasswordDocument, PasswordTemplate, Revert,WritePasswordDocument, WritePasswordTemplate, Format: OleVariant;

2015-03-10 16:59:55 738

转载 Istream用法

procedure TForm1.Button1Click(Sender: TObject);     var      memoStream,OleStream:TStream;       Stream : IStream;     begin      image1.Picture :=nil;       image2.Picture :=nil;     

2015-03-09 23:53:46 1298

空空如也

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

提示
确定要删除当前文章?
取消 删除