GDI Plus支持Delphi 2009

GDI Plus 的图形渲染支持在 Delphi 2009 里表现得挺不错的,尤其是你想搞点复杂图形或漂亮点的界面效果的时候,它能帮上不少忙。矢量图、透明度、渐变啥的,都能轻松搞定,关键是上手也不难。

Delphi 2009GDI Plus的支持比较完整,尤其是加了Unicode支持之后,多语言文本也更省心了。不管是做图形控件、动态效果,还是导出位图、加点滤镜,基本都能搞定。

比如常用的图形类:Graphics是绘图上下文,Pen是笔,Brush是画刷,配合OnPaint事件直接开干就行。下面是个绘图例子:

procedure TForm1.FormPaint(Sender: TObject);
var
  Graphics: TGDIPlusGraphics;
  Pen: TGDIPlusPen;
  Brush: TGDIPlusSolidBrush;
begin
  Graphics := TGDIPlusGraphics.Create(Canvas.Handle);
  Pen := TGDIPlusPen.Create(clBlack, 2);
  Brush := TGDIPlusSolidBrush.Create(clRed);
  Graphics.DrawRectangle(Pen, 100, 50);
  Graphics.FillEllipse(Brush, 130, 20, 80);
  Pen.Free;
  Brush.Free;
  Graphics.Free;
end;

像这种用法在做仪表盘、图形报表、甚至一些简单动画时都挺方便的。如果你之前习惯用GDI,那切到GDI Plus会感觉顺手多,支持的图形操作更全。

顺便提下,这篇 GDI Plus 图形绘制库也蛮不错的,可以对照看看一些更复杂的例子。

如果你刚好在用 Delphi 2009,又对图形表现要求比较高,那这套GDI Plus封装可以放心用,接口设计得还挺友好。

rar
GDIplusNew.rar 预估大小:5个文件
folder
GDIplusNew 文件夹
file
GDIPOBJ.dcu 249KB
file
GDIPOBJ.pas 289KB
file
GDIPUTIL.pas 25KB
file
GDIPAPI.dcu 177KB
file
GDIPAPI.pas 330KB
rar 文件大小:186.11KB