以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 行高随内容变化 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=101556) |
||||
-- 作者:kaituozhe -- 发布时间:2017/6/2 15:59:00 -- 行高随内容变化 怎么写代码能让行高随内容增加而增高? |
||||
-- 作者:有点色 -- 发布时间:2017/6/2 16:16:00 -- ChangeEdit事件,写代码
Dim gc As Graphics = BaseMainform.CreateGraphics() 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 -- 发布时间:2017/6/2 16:43:00 -- 2楼代码在表A不能实现内容变化后,根据内容变化自动调整行高
|
||||
-- 作者:有点色 -- 发布时间:2017/6/2 17:19:00 -- 1、不能粘贴进去,不能用代码赋值。只有手动打入的才行。
2、你可以在DataColChanged事件写代码 Tables("表A").AutoSizeRows |
||||
-- 作者:kaituozhe -- 发布时间:2017/6/3 18:09:00 -- 在表中没有问题了,只是窗口中表怎么实现自动变化。 |
||||
-- 作者:kaituozhe -- 发布时间:2017/6/4 2:43:00 -- 根据内容调整到适当行高,怎么能够实现打开软件时行高也不变呢? |
||||
-- 作者:有点色 -- 发布时间:2017/6/4 11:27:00 -- 以下是引用kaituozhe在2017/6/4 2:43:00的发言:
根据内容调整到适当行高,怎么能够实现打开软件时行高也不变呢?
执行代码 Tables("表A").AutoSizeRows |