Foxtable(狐表)用户栏目专家坐堂 → ShowToolTip的用法


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

主题:ShowToolTip的用法

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


加好友 发短信
等级:四尾狐 帖子:808 积分:6213 威望:0 精华:0 注册:2014/3/23 23:02:00
ShowToolTip的用法  发帖心情 Post By:2016/12/17 20:03:00 [只看该作者]

想在窗口中table表(动态测试_Table2)显示提示信息,能否在afterload后写入如下代码,报错,请问思路是否正确?谢谢

Tables("动态测试_Table2").ShowToolTip("你好狐表!"),tl.rows(2),tl.cols(2))

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2016/12/18 9:35:00 [只看该作者]

Dim t As Table = Tables("动态测试_Table2")

t.ShowToolTip("你好狐表!", t.rows(2), t.cols(2))


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


加好友 发短信
等级:四尾狐 帖子:808 积分:6213 威望:0 精华:0 注册:2014/3/23 23:02:00
  发帖心情 Post By:2016/12/18 12:16:00 [只看该作者]

试了,好像不行。

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2016/12/18 15:21:00 [只看该作者]

我这样测试可以

 

Dim t As Table = Tables("表A")
t.select
t.ShowToolTip("你好狐表!", t.rows(2), t.cols(2))


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


加好友 发短信
等级:四尾狐 帖子:808 积分:6213 威望:0 精华:0 注册:2014/3/23 23:02:00
  发帖心情 Post By:2016/12/21 15:08:00 [只看该作者]

写到aferload不管用,写到窗口上加的一个按钮控件中可以执行。
另外,一次只能显示一个提示信息,有没有其他方法在不同位置显示多条信息?谢谢!

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2016/12/21 15:52:00 [只看该作者]

变通一下,用动态加入控件的方式

 

Dim c1table As C1FlexGrid.C1FlexGrid = Tables("表A").Grid
Dim cellrect As System.Drawing.Rectangle = c1table.GetCellRect(4,3)

 

Dim lbl As new windows.forms.label
lbl.name = "test1"
lbl.width = 200
lbl.height = 50
lbl.left = cellrect.x + 20
lbl.top = cellrect.y + 10
lbl.backcolor = color.red
lbl.text = "123"
c1table.controls.add(lbl)
lbl.BringToFront


'c1table.controls.remove(c1table.controls("test1"))


 回到顶部