以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]用专业报表打印支piao遇到的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=40434)

--  作者:hzcaqjf
--  发布时间:2013/9/19 10:24:00
--  [求助]用专业报表打印支piao遇到的问题
打印支票金额的数字时,不足亿元时总出现小方块,不知怎样才能消除?
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:票据打印.table

图片点击可在新窗口打开查看此主题相关图片如下:360截图20130919101243125.jpg
图片点击可在新窗口打开查看


--  作者:程兴刚
--  发布时间:2013/9/19 10:52:00
--  

更新到最新版试一试,如果还有问题,建议贺老师升级专业报表控件,10年年底以前没有这个问题,当时我还出过不少报表,但在11年底以后,出现了这个问题,我是在12年发现的,论坛也有朋友提出,我当时已向贺老师提交改进建议,目前没有测试,如果您是最新版,请报告版本号,节后请贺老师改进,如果不是,请升级到最新版试一试。


--  作者:hzcaqjf
--  发布时间:2013/9/19 10:54:00
--  
刚买的,版本号是2013.8.26.1
--  作者:有点甜
--  发布时间:2013/9/20 21:26:00
--  
 替换的代码

For i As Integer = 0 To CStr(CurRow("金额")).Length - 2
rx = new prt.RenderText
rx.Text = GetDigit(CurRow("金额"),-2 + i)
Dim dr As DataRow = DataTables("调整").DataRows(4 + i)
Dim dy As Integer = dr("左")
Dim du As Integer = dr("上")
rx.x = dy
rx.y = du
doc.body.Children.Add(rx)
Next

 
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:票据打印 (1).table