|
网站首页
|
业界新闻
|
小组
|
威客
|
人才
|
下载频道
|
博客
|
代码贴
|
在线编程
|
编程论坛
|
登录
注册
短消息
我发表的主题
我参与的主题
我收藏的贴子
我上传的附件
我下过的附件
编辑个人资料
我的博客
用户控制面板
搜索
道具
恢复默认风格
碧海青天
秋意盎然
棕红预览
粉色回忆
蓝雅绿
紫色淡雅
青青河草
e点小镇
橘子红了
红红夜思
水晶紫色
雪花飘飘
新年快乐
风格
短消息
论坛展区
帮助
编程论坛
→
数据库技术
→
『 VFP论坛 』
→ 如何在表单中打印当记内容
我的收件箱(0)
欢迎加入我们,一同切磋技术
用户名:
密 码:
共有
1147
人关注过本帖
标题:
如何在表单中打印当记内容
只看楼主
加入收藏
sdta
来 自:江苏省连云港市
等 级:
版主
威 望:
335
帖 子:9841
专家分:27213
注 册:2012-2-5
第
11
楼
收藏
得分:0
自己写代码设计表单
坚守VFP最后的阵地
2014-01-24 16:40
举报帖子
使用道具
赠送鲜花
whinda
等 级:
贵宾
威 望:
13
帖 子:253
专家分:418
注 册:2012-2-4
第
12
楼
收藏
得分:10
打开报表-报表设计模式下,右键-数据环境-右键点中表-移去。
双击表单-init事件写:
public nRec
use xxxx.dbf alias xx
nRec=0
在打印按钮click事件写:
nRec=nRec+1
select xx
go nRec
if !eof()
report from xxxx.frm next 1 to printer
else
=message("打完收工","提示",64)
endid
return
[
本帖最后由 whinda 于 2014-1-24 19:28 编辑
]
2014-01-24 19:19
举报帖子
使用道具
赠送鲜花
whinda
等 级:
贵宾
威 望:
13
帖 子:253
专家分:418
注 册:2012-2-4
第
13
楼
收藏
得分:0
report ....
next 1.……,改为next 1哈。写错了
2014-01-24 19:26
举报帖子
使用道具
赠送鲜花
xs591222
等 级:
贵宾
威 望:
28
帖 子:682
专家分:1299
注 册:2009-3-1
第
14
楼
收藏
得分:0
把要打印的当前记录COPY到一个临时表AA,用AA作报表的数据源,打印肯定没问题的
2014-01-24 20:16
举报帖子
使用道具
赠送鲜花
qjbzjp
来 自:尧的故乡
等 级:
贵宾
威 望:
48
帖 子:1914
专家分:4397
注 册:2007-3-14
第
15
楼
收藏
得分:10
上传报表和相关表。
相互学习,互相交流,共同提高。
2014-01-24 21:18
举报帖子
使用道具
赠送鲜花
xtxzgl
等 级:
新手上路
帖 子:76
专家分:0
注 册:2012-8-22
第
16
楼
收藏
得分:0
我找到解决方法,把表单其中一“唯一字段”做关键字,到报表中去搜索
如下
REPORT FORM d:\xfdj\表1.frx FOR ALLTRIM(编号)=ALLTRIM(thisform.编号.Value)TO PRINTER PREVIEW IN screen
[
本帖最后由 xtxzgl 于 2014-1-28 10:59 编辑
]
活到老学到老
2014-01-28 10:56
举报帖子
使用道具
赠送鲜花
qczx3358
等 级:
论坛游民
帖 子:44
专家分:15
注 册:2014-1-19
第
17
楼
收藏
得分:0
是不是把表的指针跳到最后一条记录上。
2014-01-29 07:26
举报帖子
使用道具
赠送鲜花
hu9jj
来 自:红土地
等 级:
贵宾
威 望:
400
帖 子:11857
专家分:43421
注 册:2006-5-13
第
18
楼
收藏
得分:0
先定位要打印的记录,然后用3楼提供的代码打印。
活到老,学到老!http://www.(该域名已经被ISP盗卖了)E-mail:hu-jj@
2014-01-29 09:10
举报帖子
使用道具
赠送鲜花
18
2/2页
1
2
快速回复:
如何在表单中打印当记内容
数据加载中...
关于我们
|
广告合作
|
编程中国
|
清除Cookies
|
TOP
|
手机版
编程中国
版权所有,并保留所有权利。
Powered by
Discuz
, Processed in 0.035568 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved