关于GDI的有关问题，高手来看下

关于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
------解决方案--------------------

探讨

gdiplus

------解决方案--------------------

把里面的文件添加到你的工程中就可以了
------解决方案--------------------
http://download.****.net/tag/GDIPlus,Delphi
------解决方案--------------------
http://www.pudn.com/downloads91/sourcecode/windows/bitmap/detail349681.html都有呵