Foxtable(狐表)用户栏目专家坐堂 → 行高随内容变化


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

主题:行高随内容变化

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


加好友 发短信
等级:九尾狐 帖子:2236 积分:15335 威望:0 精华:0 注册:2015/7/18 10:10:00
行高随内容变化  发帖心情 Post By:2017/6/2 15:59:00 [只看该作者]

怎么写代码能让行高随内容增加而增高?

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


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

ChangeEdit事件,写代码

 

Dim gc As Graphics = BaseMainform.CreateGraphics()
Dim size As SizeF = gc.MeasureString(e.Text, e.Table.Font)

e.Table.grid.rows(e.Row.Index+1).Height = 20 + size.Height * math.Floor(size.width / iif(e.Col.width=-1,98, e.Col.width))


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


加好友 发短信
等级:九尾狐 帖子:2236 积分:15335 威望:0 精华:0 注册:2015/7/18 10:10:00
  发帖心情 Post By:2017/6/2 16:43:00 [只看该作者]

2楼代码在表A不能实现内容变化后,根据内容变化自动调整行高
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目7.foxdb


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


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

1、不能粘贴进去,不能用代码赋值。只有手动打入的才行。

 

2、你可以在DataColChanged事件写代码 Tables("表A").AutoSizeRows


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


加好友 发短信
等级:九尾狐 帖子:2236 积分:15335 威望:0 精华:0 注册:2015/7/18 10:10:00
  发帖心情 Post By:2017/6/3 18:09:00 [只看该作者]

在表中没有问题了,只是窗口中表怎么实现自动变化。


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


加好友 发短信
等级:九尾狐 帖子:2236 积分:15335 威望:0 精华:0 注册:2015/7/18 10:10:00
  发帖心情 Post By:2017/6/4 2:43:00 [只看该作者]

根据内容调整到适当行高,怎么能够实现打开软件时行高也不变呢?


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


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

以下是引用kaituozhe在2017/6/4 2:43:00的发言:

根据内容调整到适当行高,怎么能够实现打开软件时行高也不变呢?

 

执行代码 Tables("表A").AutoSizeRows


 回到顶部