很不错的绘制矢量图的控件。还有一个使用控件的例子。delphi7以上才可安装