主题：[求助]专业报表加入单元格的椭圆形如何居中？

汗都玩出来了

试试（教程改的，图片自己引用）

Dim doc As New PrintDoc
Dim rt As New prt.RenderTable
Dim ra As prt.RenderArea
Dim rm As prt.RenderImage

rt.Style.GridLines.All = New prt.LineDef
rt.Cols.Count = 3 '总列数为3
For i As Integer = 0 To 3
    ra = rt.Cells(i,0).Area '引用单元格的容器
    ra.Style.FlowAlignChildren = C1.C1Preview.FlowAlignEnum.Center
    rm = New prt.RenderImage '创建一个图片
    '设置图片对象
    rm.Image = GetImage("Can.ico")
    '设置RenderArea,并将文本和图片加入到RenderArea
    ra.Children.Add(rm) '加入图片到RenderArea中
Next
doc.Body.Children.Add(rt)
Doc.Preview()