Fpspread打印
CommonDialog1.Action = 5
k = fpSpread2.MaxRows
fpSpread2.MaxRows = k
fpSpread2.PrintOrientation = PrintOrientationLandscape
fpSpread2.PrintMarginTop = 1000
fpSpread2.PrintMarginBottom = 1000
fpSpread2.PrintMarginLeft = 1000
fpSpread2.PrintMarginRight = 1000
fpSpread2.PrintJobName = "SumBgs Software"
fpSpread2.PrintBorder = True
fpSpread2.PrintHeader = "/fn""黑体""/fz""18""/c保税区货物区内结转进库单报关料件信息/n/n/n" & "/fn""黑体""/fz""12""/l进库单号:" & Text1.Text & "/c进库类型:" & Text2.Text & "/r进库日期:" & Text5.Text & " /n/n" & "/l原货主名称:" & Text4.Text & "/c原货主10位编码:" & Text6.Text & "/r原企业编号:" & Text3.Text & " /n/n" & "/l现货主名称:" & Text8.Text & "/c现货主10位编码:" & Text9.Text & "/r现企业编号:" & Text7.Text & " /n"
fpSpread2.PrintFooter = "/fn""黑体""/fz""14""/r上海外高桥保税区海关监制"
fpSpread2.PrintBorder = True
fpSpread2.PrintGrid = True
fpSpread2.PrintType = PrintTypeAll
fpSpread2.PrintRowHeaders = False
fpSpread2.PrintShadows = False
fpSpread2.Action = ActionPrint
联系客服