关于C1.Win.C1Preview指定坐标打印输出

第一次使用ComponentOne控件，而且还是vb到vb.net升级项目。
以前旧版本报表输出的程序中有
.CurrentX
.CurrentY
.Font
.CtlText
等相关指定坐标输出文本的语句。

现在使用C1.Win.C1Preview输出时，由于找不到相关参考文档和
例子，能不能给提供一套指定坐标、字体进行报表输出的例子参考下，多谢！

输出文本和画线已通过下面方式实现

''' <summary>
        ''' DrawLineを設定します。
        ''' </summary>
        Sub DrawLine(intA As Integer, intB As Integer, intC As Integer, intD As Integer)
            Dim ra1 As New RenderArea()
            ra1.X = 0
            ra1.Y = 0
            Dim rpoly1 As New RenderPolygon()
            rpoly1.Line.Points = New UnitPoint() { _
                    New UnitPoint(intA, intB), _
                    New UnitPoint(intC, intD)
                }
            'rpoly1.Line.Closed = True
            '' 塗りつぶし色を設定
            'rpoly1.Style.ShapeFillColor = Color.Gainsboro
            '' パディングを設定
            'rpoly1.Style.Padding.All = "0.5cm"
            'rpoly1.Style.BackColor = Color.Cornsilk
            ra1.Children.Add(rpoly1)
            _Document.Outlines.Add("RenderPolygon", rpoly1)
            ' 最後にドキュメントに外側のRenderAreaを追加します。
            _Document.Body.Children.Add(ra1)
        End Sub

''' <summary>
        ''' CtlTextを取得または設定します。
        ''' </summary>
        Property CtlText As String
            Get
                Return MyBase.StatusText
            End Get
            Set(value As String)
                Dim rt As RenderText = New RenderText
                rt.Style.Font = Me.Font
                rt.X = _CurrentX
                rt.Y = _CurrentY
                'rt.SplitVertBehavior = SplitBehaviorEnum.Never
                'rt.Height = Unit.Auto
                'rt.Width = Unit.Auto
                'rt.Style.Borders.All = LineDef.Empty
                'rt.Style.TextAngle = 0
                rt.Text = value
                _Document.Body.Children.Add(rt)
            End Set
        End Property

回复 2楼xaj21的帖子

请问现在1#问题解决了吗？还有哪些没有解决？

已经实现相应功能，暂时在打印输出这块没有问题了

回复 4楼xaj21的帖子

好的，感谢您反馈问题处理结果。