API怎么画出很圆的圆和怎么获得ListView的列对齐方式

API如何画出很圆的圆和如何获得ListView的列对齐方式？
重绘RadioBox过程中，我不想用贴图，于是我用我用 Ellipse 画圆
但直径13的圆一点也不圆，请问下谁有好的方法吗！

还有如何获得ListView的列对齐方式？

[解决办法]
用GDI+画就可以抗锯齿啊:

VB code

'新建工程,添加一个按钮.Option Explicit  'GDI+画圆,抗锯齿模式 ' '   API与结构声明模块请到http://www.vistaswx.com下载. ' 'By 嗷嗷叫的老马 'http://www.m5home.com/ '  Dim graphics As Long Dim pen As Long  Private Sub Form_Load()     InitGDIPlus     GdipCreateFromHDC Me.hDC, graphics                                  '创建Graphics对象          Call GdipCreatePen1(&HFF0000FF, 1, UnitPixel, pen)                  '创建一个蓝色不透明的画笔,粗细为1像素     Call GdipSetSmoothingMode(graphics, SmoothingModeAntiAlias)         '设置为抗锯齿模式 End Sub  Private Sub Command1_Click()     Call GdipDrawEllipseI(graphics, pen, 20, 20, 13, 13)                '在20,20的位置画一个13x13的很圆的圈圈.... End Sub  Private Sub Form_Unload(Cancel As Integer)     GdipDeletePen pen     GdipDeleteGraphics graphics          TerminateGDIPlus End Sub