Foxtable(狐表)用户栏目专家坐堂 → [求助]报表里引用图片列如果通过图片的长宽尺寸判断修改图片的打印尺寸?


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

主题:[求助]报表里引用图片列如果通过图片的长宽尺寸判断修改图片的打印尺寸?

帅哥哟,离线,有人找我吗?
111yangguojun
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:243 积分:1928 威望:0 精华:0 注册:2013/8/8 23:49:00
[求助]报表里引用图片列如果通过图片的长宽尺寸判断修改图片的打印尺寸?  发帖心情 Post By:2015/12/30 15:15:00 [只看该作者]

有个图片列  比方列名  叫  tupian ,

如何在报表打印中根据当前行“tupian” 列中图片的长宽尺寸进行如下判断:

如果 长/宽 > 1.5 的时候,图片尺寸按   长:100  宽50 显示
否则,图片尺寸按  长  100 宽 30显示

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/12/30 15:32:00 [只看该作者]

方法一:对所有图片,根据规则剪裁一次。

 

方法二:不可能用模板直接导出,你需要编写代码动态的生成图片,类似生成条码的方法。

 

http://www.foxtable.com/help/topics/1955.htm

 

方法三:在方法二的基础上,直接修改模板内容 http://www.foxtable.com/help/topics/2294.htm

 


 回到顶部
帅哥哟,离线,有人找我吗?
111yangguojun
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:243 积分:1928 威望:0 精华:0 注册:2013/8/8 23:49:00
  发帖心情 Post By:2015/12/30 17:05:00 [只看该作者]

采用老师给的方法二,有一点偏差,请老师看下问题出在哪:
BuildDetail代码如下:
Select Case e.Book.TempLate
    Case "生产指令单"
        If e.DataRow IsNot Nothing Then            
            Dim Filter1 As String = "订单编号 = '" & e.DataRow("订单编号") & "'"
            e.Book.Marks("图片1") = "[&&" & ProjectPath & "RemoteFiles" & e.DataRow("图纸") & "]"           
        End If
End Select

模版中<图片1>的位置, 导出后引用的图纸没出现,出现了以下的内容
[&&E:\销售管理(远程)\RemoteFiles/图纸/邓启军/XSDD-1512-0040.png]

我把模板中的<图片1>更改为[&&E:\销售管理(远程)\RemoteFiles/图纸/邓启军/XSDD-1512-0040.png],再导出后图片是可以正常显示的

这里面代码哪个地方有错误码?

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/12/30 17:09:00 [只看该作者]

不能这样写。模板里写

 

[&&c:\Images\myfox.gif]

 

然后把图片拷贝替换,myfox.gif


 回到顶部