找回密码
 立即注册

QQ登录

只需一步,快速开始

qinbinghao

初级会员

32

主题

93

帖子

295

积分

初级会员

积分
295

活字格认证微信认证勋章

qinbinghao
初级会员   /  发表于:2013-10-31 10:02  /   查看:9422  /  回复:11
Dim side As New FarPoint.Win.ComplexBorderSide(ComplexBorderSideStyle.ThinLine, Color.Black)
                Dim side1 As New FarPoint.Win.ComplexBorderSide(ComplexBorderSideStyle.None)
                Dim bord As New FarPoint.Win.ComplexBorder(side, side, side1, side1)
                FpSpread1.ActiveSheet.Cells(2, 2, 14, 10).Border = bord
打印预览时没问题,但送打印机时提示“内存不足”

请问如何解决?

11 个回复

倒序浏览
iceman
社区贡献组   /  发表于:2013-10-31 11:41:00
沙发
回复 1楼qinbinghao的帖子

如果是提示打印机内存不足,那么需要清理打印机内存或者扩展内存条容量。

同时,Spread 可以选择打印的范围,你可以尝试分批打印。参考代码:

  1. FarPoint.Win.Spread.PrintInfo printset = new FarPoint.Win.Spread.PrintInfo();

  2. // Allow printing of only 20 columns and 20 rows of cells
  3. printset.ColStart = 1;
  4. printset.ColEnd = 20;
  5. printset.RowStart = 1;
  6. printset.RowEnd = 20;
  7. printset.PrintType = FarPoint.Win.Spread.PrintType.CellRange;

  8. // Allow printing of only five pages
  9. printset.PageStart = 1;
  10. printset.PageEnd = 5;

  11. // Allow printing of the cell notes together at the end
  12. printset.PrintNotes = FarPoint.Win.Spread.PrintNotes.AtEnd;

  13. // Allow printing of the shapes
  14. printset.PrintShapes = true;

  15. // Allow printing of only rows and columns up to the last ones with data
  16. printset.UseMax = True;

  17. // Assign the printer settings to the sheet and print it
  18. fpSpread1.Sheets[0].PrintInfo = printset;
  19. fpSpread1.PrintSheet(0);
复制代码
回复 使用道具 举报
qinbinghao
初级会员   /  发表于:2013-10-31 14:26:00
板凳
回复 2楼iceman的帖子

我换了4台不同规格的打印机了,
回复 使用道具 举报
qinbinghao
初级会员   /  发表于:2013-10-31 14:34:00
地板
回复 2楼iceman的帖子

您好!你给方案也无法解决这个问题?我急着呢
回复 使用道具 举报
iceman
社区贡献组   /  发表于:2013-10-31 16:27:00
5#
回复 4楼qinbinghao的帖子

主要可能不是打印机型号的问题,是打印机内存大小的问题。有没有尝试给打印机添加一个更大的内存条?

有没有尝试2#中的代码?
回复 使用道具 举报
qinbinghao
初级会员   /  发表于:2013-10-31 16:39:00
6#
试了,添加一个更大的内存条也一样.
Spread for Windows Forms 7.0  PC系
统win7
Dim side As New FarPoint.Win.ComplexBorderSide(ComplexBorderSideStyle.ThinLine, Color.Black)
                Dim side1 As New FarPoint.Win.ComplexBorderSide(ComplexBorderSideStyle.None)
                Dim bord As New FarPoint.Win.ComplexBorder(side, side, side1, side1)
                FpSpread1.ActiveSheet.Cells(2, 2, 4, 6).Border = bord
你可以试一下

可能是Bug
回复 使用道具 举报
qinbinghao
初级会员   /  发表于:2013-10-31 16:41:00
7#
2#中的代码也试了,也无法解决.
回复 使用道具 举报
qinbinghao
初级会员   /  发表于:2013-10-31 17:03:00
8#
我把Spread .xml文件发给你,你试一下

Spread .rar

6.16 KB, 下载次数: 777

Spread .xml文件

回复 使用道具 举报
iceman
社区贡献组   /  发表于:2013-10-31 17:25:00
9#
回复 8楼qinbinghao的帖子

你好,
问题我已经重现了,正在寻找解决方法。
回复 使用道具 举报
iceman
社区贡献组   /  发表于:2013-10-31 17:42:00
10#
回复 8楼qinbinghao的帖子

请你使用附件程序测试,看是否还会出现问题?

51498.zip (12.16 KB, 下载次数: 774)
回复 使用道具 举报
12下一页
您需要登录后才可以回帖 登录 | 立即注册
返回顶部