vfp报表纸张设置_vfp9终结一直以来的打印纸张设置

文章来源：互联网

*********************************************************

* vfp9终结一直以来关于打印纸张设置

* 过程名称：MyReport.prg

* 调用方式：MyReport(ReportName, Height, Width)

* 当 Height和Width为空时，默认A4纸

* 程序原创：dupeiji

* 最后修改：pnyjq

* 修改日期：2005-03-23

* 待解决问题：当ListenerType = 1时无法正常预览

*********************************************************

Parameters lcFRX, nHeight, nWidth

Local loReportListener

If Empty(lcFRX)

Return

Endif

loReportListener = Createobject("Test")

#DEFINE A4_Height 29.7

#DEFINE A4_Width 21

loReportListener.sHeight=Icase(Empty(nHeight), A4_Height, nHeight)

loReportListener.sWidth=Icase(Empty(nWidth), A4_Width, nWidth)

Report Form (lcFRX) Object loReportListener

Define Class Test As ReportListener

ListenerType = 0

sHeight=0

Procedure GetPageHeight()

If This.sHeight >0

Return This.sHeight * 377.95

Else

Return DoDefault()

Endif

Endproc

sWidth=0

Procedure GetPageWidth()

If This.sWidth >0

Return This.sWidth * 377.95

Else

Return DoDefault()

Endif

Endproc

Procedure OutputPage(nPageNo, eDevice, nDeviceType, nleft, nTop, nWidth, nHeight)

t_sHeight=This.sHeight

This.sHeight=0

nHeight=t_sHeight * 377.95 * nHeight/This.GetPageHeight()

This.sHeight=t_sHeight

t_sWidth=This.sWidth

This.sWidth=0

nWidth=t_sWidth * 377.95 * nWidth/This.GetPageWidth()

This.sWidth=t_sWidth

DoDefault(nPageNo, eDevice, nDeviceType,nleft, nTop, nWidth, nHeight)

Nodefault

Endproc

Enddefine

vfp报表纸张设置_vfp9终结一直以来的打印纸张设置相关推荐

vfp报表纸张设置_VFP 9.0中实现多种自定义纸张格式的报表打印
VFP 9.0 中实现多种自定义纸张格式的报表打印徐小栋 [期刊名称] <福建电脑> [年 ( 卷 ), 期] 2009(025)001 [摘要] 该文叙述了在 VFP 9.0 开发的应 ...
vfp报表纸张设置_VFP 8.0 中实现多种自定义纸张格式的报表打印(转贴)
t 摘要:本文叙述了在VFP8.0开发的应用程序中,利用报表设计器设计的各种非WINDOWS标准页面大小的报表,在WIN2000/XP下如何打印的问题.通过在WIN2000/XP的"打印机和 ...
vfp报表纸张设置_Excel表格美化十四招，让你的报表不再那么丑
小伙伴们好啊,今天老祝和大家分享的是一组表格美化技巧. 一个高质量的Excel文档,除了应具备数据准确.易读等特性,还应该有合理的布局结构.清新的色彩搭配以及整洁清晰的版面.这样才能提高数据的展现能力 ...
vfp报表纸张设置_JimuReport积木报表 — API数据源报表制作
积木报表 ,一个开源免费的报表工具,像搭建积木一样在线设计报表!功能涵盖数据报表设计.打印设计.图表设计.大屏设计等! 领先的企业级Web报表平台软件,采用纯Web在线技术,专注于解决企业报表快速制作 ...
针式怎么修改打印机服务器属性,针式打印机设置,小编教你针式打印机怎么设置纸张大小...
在我们使用打印机时,有些纸张不是标准尺寸,我们无法直接选择上.如果要打印纸张的尺寸不是常规的,那针式打印机要怎么才能打印呢?针式打印机和激光打印机是办公室比较常用的,想要这只这类打印机怎么设置打印纸张 ...
PB想从程序里面控制自己想要的纸张的大小而不用去打印机里去设置纸张
想从程序里面控制自己想要的纸张的大小而不用去打印机里去设置纸张如果你是使用datawindow直接打印,那么在datawindow设计界面,属性中有个"Print Specificatio ...
html横打和竖打如何设置,打印机的横打和竖打设置
打印机的横打和竖打设置一般办公用的激光打印机都是竖直进纸,比如16K.A4的纸,竖着进去,竖着出来. 前几天,在网络应用软件上完成一个报表,最终要打印出来,由于软件报表本来是横排版的,但是软件系统中 ...
echarts空数据如何设置_拼多多分时折扣如何设置优化？分时数据怎么看？
一.什么时候优化分时折扣 1.优化好关键词.智能词包.人群定向时,再优化分时折扣. 2.还有一种情况是智能词包前期为了拿流量出价比较高,导致关键词出价也高,最后导致流量过大,这时可以先统一设置下分时折 ...
html 设置打印区域,excel打印区域怎么设置
无论是excel还是word都是我们日常办公较为常见的,在打印excel的时候,经常需要来设定打印区域,才能更好的打印我们所要的东西,而不是默认去分布,这样容易导致自动分页,内容脱节就不好看了.那么, ...

vfp报表纸张设置_vfp9终结一直以来的打印纸张设置

vfp报表纸张设置_vfp9终结一直以来的打印纸张设置相关推荐

最新文章

热门文章