易表在线答疑 → 技术与交流 → 用户社区 → [求助]打印问题


  共有8537人关注过本帖树形打印复制链接

主题：[求助]打印问题
帅哥哟，离线，有人找我吗？
paradise2008
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游民 帖子：33 积分：0 威望：0 精华：0 注册：2007/10/16 21:54:00 		[求助]打印问题  发帖心情 Post By：2007/11/11 22:03:00 [只看该作者]

打印时明细能打印出来吗？
 回到顶部
帅哥哟，离线，有人找我吗？
Czy
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：13147 积分：-89 威望：0 精华：0 注册：2006/8/11 11:14:00 		  发帖心情 Post By：2007/11/11 22:08:00 [只看该作者]

只能用报表打印出明细列的内容。
在报表中打印明细表的内容可以看一下这里：

http://bbs.egridsoft.com/chs/chm/printsubgrid.htm
 回到顶部
帅哥哟，离线，有人找我吗？
易中天
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游民 帖子：80 积分：0 威望：0 精华：0 注册：2008/2/28 21:03:00 		[求助]列数据如何在它表中转为行数据？  发帖心情 Post By：2008/4/8 16:10:00 [只看该作者]

问:如何把表1数据按表2排列格式传过去?,表2中的公式该如何写,才能达到目的?十分感谢你的帮助!egd文件下载

 回到顶部
帅哥哟，离线，有人找我吗？
wjq1072
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：16190 积分：125850 威望：1 精华：0 注册：2006/8/12 12:29:00 		  发帖心情 Post By：2008/4/8 16:17:00 [只看该作者]

拿前辈做的一个作品给你参考吧！
egd文件下载

 回到顶部
帅哥哟，离线，有人找我吗？
易中天
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游民 帖子：80 积分：0 威望：0 精华：0 注册：2008/2/28 21:03:00 		  发帖心情 Post By：2008/4/8 16:38:00 [只看该作者]

哪儿来的？太妙了！可能我学不会，这一大堆公式：
DelFor(Grid,"项目","=","")And eval("CreateGrid(""正转换中,请稍候..."","""+Substitute(ListCols("行列互转"),"|",""",0,""")+""",0)") And CopyRows(Grids) And DelFor(Grids,1, "=" ,"")And SetVariable("%A%",ListFor(Grid,"项目")) And SetVariable("%C%",ListCols(Grid)) And SetVariable("%E%",Rows) And SetVariable("%F%",Cols-1) And eval("RenameCol("+Substitute(Substitute(Mid([%so%],0,Search("|",Substitute([%so%],"|","#",min([%E%],[%F%])))),"|",",1)) And RenameCol("),"&",",cell(")+"))")and If([%F%]>[%E%],eval(mid(Rept("And DeleteCol(Cols)",[%F%]-[%E%]),4)) And AddRows(Grid,[%F%]-[%E%]), eval("AddCol("""+ Substitute(Mid([%A%],Search("|",Substitute([%A%]+"|&","|","/",[%F%]-1))+1),"|",""",0, True )And AddCol(""")+""",0,True)") And eval(mid(Rept("And DelRow(Grid,Rows)",[%E%]-[%F%]),4)))And EvalFor(Grid,1,"Split([%C%],""|"",Row+1)") And eval("EvalFor(Grid,"+Substitute(Substitute(Mid([%si%],0,Search("|",Substitute([%si%],"|","%",Cols- 2))),"|","-1,Row+1,Grids)"")And EvalFor(Grid,"),"&",",""cell(")+"-1,Row+1,Grids)"")") And Select(Rows,1,Rows,Cols) And Do(92) And Do(92)And Last()And RemoveGrid(Grids)

谢谢你！


 回到顶部
帅哥哟，离线，有人找我吗？
tzszw
 小大  6楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：蒙面侠 帖子：2409 积分：400 威望：0 精华：0 注册：2006/8/14 19:31:00 		  发帖心情 Post By：2008/4/8 22:08:00 [只看该作者]

这个是YBIL先生的作品，绝对精品啊！

 回到顶部
帅哥哟，离线，有人找我吗？
易中天
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：论坛游民 帖子：80 积分：0 威望：0 精华：0 注册：2008/2/28 21:03:00 		  发帖心情 Post By：2008/4/8 22:36:00 [只看该作者]

好是好，就是不对路

 回到顶部
帅哥哟，离线，有人找我吗？
wjq1072
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：16190 积分：125850 威望：1 精华：0 注册：2006/8/12 12:29:00 		  发帖心情 Post By：2008/4/9 7:56:00 [只看该作者]

自己的路只有自己创！

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright ©2002 - 2005 egrid2000.com   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03711 秒, 5 次数据查询