Foxtable(狐表)用户栏目专家坐堂 → [求助]如何返回当前行的行高


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

主题:[求助]如何返回当前行的行高

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


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
[求助]如何返回当前行的行高  发帖心情 Post By:2016/8/16 10:41:00 [只看该作者]

请教老师:如何返回当前行的行高

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


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
  发帖心情 Post By:2016/8/16 10:45:00 [只看该作者]

想在表的MouseEnterCell事件中写一段代码,目的是当单元格内的数据显示不全时(可能是列不够宽,或因是多行而行不够高,但又不想改变行高),当鼠标位于该单元格时,弹出提示框显示单元格的值,请老师给写一段代码,先谢谢了!

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


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
  发帖心情 Post By:2016/8/16 11:48:00 [只看该作者]

请老师看看

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/8/16 12:22:00 [只看该作者]


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


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
  发帖心情 Post By:2016/8/16 12:30:00 [只看该作者]

这个例子是都要弹出提示框,我想判断一下,若单元格显示全了,就不弹出提示框,怎么作

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


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

 mark MeasureString

 

Dim cwidth As Integer = iif(e.Col.Width=-1, 98, e.Col.Width)
Dim cheight As Integer = e.Table.Grid.Rows(e.Row.Index+1).height
cheight = iif(cheight = -1, 20, cheight)
Dim msg As String = e.Row(e.Col.name)
Dim gc = basemainform.CreateGraphics
Dim size = gc.MeasureString(msg, e.Table.Font)
If size.width > cwidth OrElse size.Height > cheight Then
    e.Table.ShowToolTip(e.Row(e.Col.name),e.Row,e.Col)
End If


 回到顶部