GDI Plus支持Delphi 2009
GDI Plus 的图形渲染支持在 Delphi 2009 里表现得挺不错的,尤其是你想搞点复杂图形或漂亮点的界面效果的时候,它能帮上不少忙。矢量图、透明度、渐变啥的,都能轻松搞定,关键是上手也不难。
Delphi 2009对GDI 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
封装可以放心用,接口设计得还挺友好。
GDIplusNew.rar
预估大小:5个文件
GDIplusNew
文件夹
GDIPOBJ.dcu
249KB
GDIPOBJ.pas
289KB
GDIPUTIL.pas
25KB
GDIPAPI.dcu
177KB
GDIPAPI.pas
330KB
186.11KB
文件大小:
评论区