Foxtable(狐表)用户栏目专家坐堂 → 文本对象的Width ,Height ,x,y等如何引用Table中相关数据?


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

主题:文本对象的Width ,Height ,x,y等如何引用Table中相关数据?

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


加好友 发短信
等级:八尾狐 帖子:1812 积分:12999 威望:0 精华:14 注册:2008/10/11 18:07:00
文本对象的Width ,Height ,x,y等如何引用Table中相关数据?  发帖心情 Post By:2009/2/26 15:47:00 [只看该作者]

请教文本对象的Width ,Height ,x,y是什么类型?如何引用Table中相关数据?

下面代码得不出结果.

Dim doc As New PrintDoc
Dim rt As New prt.RenderText
Dim r as Row = Tables("表A").Rows(0)
rt.Text = r("Name")
rt.Width = r("Width")
rt.Height = r("Height")
rt.x = r("x")
rt.y = r("y")   
doc.Body.Children.Add(rt)
doc.Preview()

[此贴子已经被作者于2009-2-27 11:42:52编辑过]

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


加好友 发短信
等级:管理员 帖子:47497 积分:251397 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2009/2/26 16:32:00 [只看该作者]

x和y都是整数的。
上面的代码,应该是可以执行的。
如果你的width列和height列,也是整数型的话。

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


加好友 发短信
等级:八尾狐 帖子:1812 积分:12999 威望:0 精华:14 注册:2008/10/11 18:07:00
  发帖心情 Post By:2009/2/26 16:55:00 [只看该作者]

以下是引用狐狸爸爸在2009-2-26 16:32:00的发言:
x和y都是整数的。
上面的代码,应该是可以执行的。
如果你的width列和height列,也是整数型的话。

不能!

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:aa.table


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


加好友 发短信
等级:管理员 帖子:47497 积分:251397 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2009/2/26 17:07:00 [只看该作者]

呵呵,用Val函数来一个霸王硬上弓:

Dim doc As New PrintDoc
Dim rt As New prt.RenderText
Dim r as Row = Tables("表A").Rows(0)
rt.Text = r("Name")
rt.Width = Val(r("Width"))
doc.Body.Children.Add(rt)
doc.Preview()

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


加好友 发短信
等级:八尾狐 帖子:1812 积分:12999 威望:0 精华:14 注册:2008/10/11 18:07:00
  发帖心情 Post By:2009/2/26 17:36:00 [只看该作者]

以下是引用狐狸爸爸在2009-2-26 17:07:00的发言:
呵呵,用Val函数来一个霸王硬上弓:

Dim doc As New PrintDoc
Dim rt As New prt.RenderText
Dim r as Row = Tables("表A").Rows(0)
rt.Text = r("Name")
rt.Width = Val(r("Width"))
doc.Body.Children.Add(rt)
doc.Preview()
用ValOK了,多謝!

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


加好友 发短信
等级:八尾狐 帖子:1812 积分:12999 威望:0 精华:14 注册:2008/10/11 18:07:00
  发帖心情 Post By:2009/2/27 11:33:00 [只看该作者]

...
rt.Width = 35(或"35.33")没问题,就是不能rt.Width = r("Width"),是否算作一个Bug?如不可修正,至少应在帮助中说明(帮助中似乎没有例子).



 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251397 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2009/2/27 11:34:00 [只看该作者]

呵呵,我看看。


 回到顶部