通过RenderGraphics显示文本，字体大小会自动缩放

收藏

本帖最后由 yanping 于 2019-3-1 08:44 编辑

         bodyTbl = New RenderTable()
         Dim gr As New RenderGraphics(Me)
         gr.Graphics.DrawString("あいうえお", Me.Style.Font, Brushes.Black, New RectangleF(0, 0, 400, 50))
         bodyTbl.Style.GridLines.All = LineDef.Default
         bodyTbl.Rows(0).Height = "10mm"  //Height設定後、字体大小不能正常显示，会随着Height値变化。
         With bodyTbl.Cells(0, 0)
            .RenderObject = gr
         End With
         MyBase.PageArea.Children.Add(bodyTbl)

  通过RenderGraphics显示文本的时候，字体大小会随意变动。
版本是C1Report.4 ，之前用的C1Report.2可以正常显示。是和什么属性有关吗？

Richard.Ma · Richard.Ma

您好，请提供一个小的demo我来重现，能更快速的处理您的问题

yanping · yanping

Richard.Ma 发表于 2019-3-1 09:49
您好，请提供一个小的demo我来重现，能更快速的处理您的问题

Public Class Form1

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

      Dim bodyTbl As RenderTable
      bodyTbl = New RenderTable()
      Dim gr As New RenderGraphics()
      Dim font As Font = New Font("ＭＳゴシック", 12)
      Dim str As String = "あいう"
      Dim rect As New RectangleF(0, 0, 400, 50)
      Dim sft As New StringFormat(StringFormatFlags.NoWrap)
      bodyTbl.Rows(0).Height = "5mm" '字体大小会受Height値影響。
      'bodyTbl.Rows(0).Height = "50mm"
      gr.Graphics.DrawString(str, font, Brushes.Black, rect, sft)
      With bodyTbl.Cells(0, 0)
         .RenderObject = gr
      End With

      doc.StartDoc()
      doc.Body.Children.Add(bodyTbl)
      doc.EndDoc()
      doc.Generate()
End Sub

End Class

yanping · yanping

Richard.Ma 发表于 2019-3-1 09:49
您好，请提供一个小的demo我来重现，能更快速的处理您的问题

Public Class Form1

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

      Dim bodyTbl As RenderTable
      bodyTbl = New RenderTable()
      Dim gr As New RenderGraphics()
      Dim font As Font = New Font("ＭＳゴシック", 12)
      Dim str As String = "あいう"
      Dim rect As New RectangleF(0, 0, 400, 50)
      Dim sft As New StringFormat(StringFormatFlags.NoWrap)
      bodyTbl.Rows(0).Height = "5mm" '字体大小会受Height値影響。
      'bodyTbl.Rows(0).Height = "50mm"
      gr.Graphics.DrawString(str, font, Brushes.Black, rect, sft)
      With bodyTbl.Cells(0, 0)
         .RenderObject = gr
      End With

      doc.StartDoc()
      doc.Body.Children.Add(bodyTbl)
      doc.EndDoc()
      doc.Generate()
End Sub

End Class

Richard.Ma · Richard.Ma

您好，还是请您上传一个完整的demo来重现问题，非常感谢

yanping · yanping

已上传

Richard.Ma · Richard.Ma

您好，我在当前版本的C1Report.4和C1Report.2上测试大小都是会变化的，
您说的之前的不会影响大小的版本是哪个版本呢

yanping · yanping

Richard.Ma 发表于 2019-3-4 17:27
您好，我在当前版本的C1Report.4和C1Report.2上测试大小都是会变化的，
您说的之前的不会影响大小的版本是 ...

您好,不好意思,给你添麻烦了,说错了版本号
版本号
C1Preview.2.dll 2.6.20091.52017 Height不会影响Font大小
C1Report.4.dll 4.0.20183.338 Height会影响Font大小

Richard.Ma · Richard.Ma

yanping 发表于 2019-3-5 08:44
您好,不好意思,给你添麻烦了,说错了版本号
版本号
C1Preview.2.dll 2.6.20091.52017 Height不会 ...

您发我的demo中只使用了C1Report,所以这个应该是两个控件设计的一个差异，C1Preview确实不会影响字体大小

yanping · yanping

Richard.Ma 发表于 2019-3-5 17:30
您发我的demo中只使用了C1Report,所以这个应该是两个控件设计的一个差异，C1Preview确实不会影响字体大小

C1Report可以实现字体大小不随Height变化的功能吗？什么属性有关吗？

		自动登录	找回密码
密码			立即注册

[已处理] 通过RenderGraphics显示文本，字体大小会自动缩放

12 个回复

本帖子中包含更多资源

SpreadJS 认证

SpreadJS 高级认证

讲师达人

悬赏达人