请教一个问题，VFP打印问题 - VFP论坛

asonglinux

等　级：新手上路
帖　子：4
专家分：4
注　册：2021-12-15
结帖率：0

楼主

已结贴√ 问题点数：20 回复次数：9

请教一个问题，VFP打印问题

有什么控件或者表格能实现即时打印么？所见即所得，调整好了，直接在FORM表单中打印？

搜索更多相关主题的帖子: 表格　 VFP　FORM　表单　打印　

2022-01-08 10:42

asonglinux

等　级：新手上路
帖　子：4
专家分：4
注　册：2021-12-15

第 3 楼

得分:0

回复 2楼 laowan001

就是有时候需要拉动列或者宽度进行调整， VFP报表没法调整啊

2022-01-08 11:20

吹水佬

等　级：版主
威　望：432
帖　子：10064
专家分：41463
注　册：2014-5-20

第 5 楼

得分:5

报表一般是相对固定，不会经常变动格式，设计时可通过预览来调整格式。
如果是动态格式报表，就要在运行时由程序动态生成报表输出。

2022-01-08 12:10

jlliushi

等　级：论坛游民
帖　子：33
专家分：10
注　册：2021-12-24

第 7 楼

得分:5

*调用Excel打印
oExcel=Createobject("Excel.application")    &&创建Excel对象
oExcel.Workbooks.Open("要打印的表.xls")     &&打开指定工作簿
oExcel.Worksheets("sheet1").Activate   &&设置"sheet1"工作表为激活工作表

*给单元格赋值
   oExcel.cells(1,2).Value="要写入单元格的内容1"
   oExcel.cells(1,3).Value="要写入单元格的内容2"
*  ......

oExcel.Visible=.T.   &&显示Excel窗口
oExcel.ActiveWorkbook.Save    &&存盘

*预览/打印
oExcel.ActiveWorkbook.PrintPreview
*oExcel.ActiveSheet.PrintPreview
*关闭工作簿
oExcel.Workbooks.Close
*退出Excel
*oExcel.Quit
Release oExcel &&只有释放对象变量, EXCEL进程才会完全关闭

2022-01-11 05:53

fyyylyl

等　级：贵宾
威　望：16
帖　子：287
专家分：676
注　册：2006-5-22

第 9 楼

得分:0

多年前用过一位网友此功能的类文件，在FORM中调整好GRID实现“所见所得”...

[此贴子已经被作者于2022-1-18 09:34编辑过]

2022-01-18 08:56