关于GDI的问题，高手来看下。
procedure TForm1.FormPaint(Sender: TObject);
var
g: TGPGraphics;
p: TGPPen;
begin
g := TGPGraphics.Create(Canvas.Handle);
p := TGPPen.Create(aclRed, 2);
g.SetSmoothingMode(ListBox1.ItemIndex - 1);
g.DrawEllipse(p, 10, 10, ClientWidth - ListBox1.Width - 20, ClientHeight - 20);
g.DrawLine(p, 0, 0, ClientWidth - ListBox1.Width, ClientHeight);
g.DrawLine(p, ClientWidth - ListBox1.Width, 0, 0, ClientHeight);
p.Free;
g.Free;
end;
以这段代码为例，我想问的是，在var中 TGPGraphics和TGPPen是什么，在我的印象中，好像没见过这样的变量类型，请指导。
我也考虑过，可能是一个GDI软包包，可是在哪里可以下载到，请给个地址，谢谢.在线等!
[解决办法]
gdiplus
[解决办法]
