主题：帮助中"RenderArea"的错误

rt.Text = "Hello Foxtable " & i '设置文本对象的内容
    rt.Width = 35 '宽度为35毫米
    rt.Height = 15 '宽度为15毫米
    rt.Style.Spacing.All = 2 '设置各个方向的间隔
    rt.Style.Borders.All = New prt.Linedef(1, Color.Red) '设置边框
    rt.Style.TextAlignHorz = prt.AlignHorzEnum.Center '水平居中
    rt.Style.TextAlignVert = prt.AlignVertEnum.Center '垂直居中
    doc.Body.Children.Add(rt) '将文本对象加入到报表
Next
ra.Stacking = prt.StackingRulesEnum.InlineLeftToRight '设置容器中对象的排列方式
For i AS integer = 4 To 7
    rt = New prt.RenderText() '创建文本对象
    rt.Text = "Hello Foxtable " & i '设置文本对象的内容
    rt.Width = 35 '宽度为35毫米
    rt.Height = 15 '宽度为15毫米


上面二处黄色背景处,均应是:高度为15毫米

搞定