以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 当前行的行高,根据该单元格的内容所需,自动调整行高,当鼠标离开该单元格时,改行恢复默认行高? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=133115) |
-- 作者:fengwenliuyan -- 发布时间:2019/4/7 15:29:00 -- 当前行的行高,根据该单元格的内容所需,自动调整行高,当鼠标离开该单元格时,改行恢复默认行高? 鼠标单击进入单元格,当前行的行高,根据该单元格的内容所需,自动调整行高,当鼠标离开该单元格时,改行恢复默认行高,代码应该怎么写,写在哪个事件比较合适? |
-- 作者:有点甜 -- 发布时间:2019/4/7 15:31:00 -- 参考
http://www.foxtable.com/webhelp/scr/1564.htm
http://www.foxtable.com/webhelp/scr/1552.htm
调整代码,写到你所需要的事件,即可 |
-- 作者:fengwenliuyan -- 发布时间:2019/4/8 0:45:00 -- 回复:(有点甜)参考?http://www.foxtable.... 搞不定啊? 我在AfterOpenProject事件中,设置了Tables("入库明细表")的默认行高: Tables("入库明细表").DefaultRowHeight = 20 在表属性的DoubleClick事件中,设置了: If e.Col.Name = "入库备要" Then e.Table.AutoSizeRow(e.Row.Index) End If 那么,请问,换行双击,或选择其他单元格双击时,本次调整的行高恢复到AfterOpenProject事件中,设置的Tables("入库明细表")的默认行高,这个代码应该怎么写?写在哪儿? [此贴子已经被作者于2019/4/8 0:46:27编辑过]
|
-- 作者:fengwenliuyan -- 发布时间:2019/4/8 8:40:00 -- 求帮助 |
-- 作者:有点甜 -- 发布时间:2019/4/8 10:15:00 -- 以下是引用fengwenliuyan在2019/4/8 0:45:00的发言:
那么,请问,换行双击,或选择其他单元格双击时,本次调整的行高恢复到AfterOpenProject事件中,设置的Tables("入库明细表")的默认行高,这个代码应该怎么写?写在哪儿? [此贴子已经被作者于2019/4/8 0:46:27编辑过]
比如,afterselChanged事件,写代码
e.Table.grid.Rows(e.OldRange.RowSel+e.Table.HeaderRows).height = e.Table.DefaultRowHeight |
-- 作者:fengwenliuyan -- 发布时间:2019/4/8 14:37:00 -- 回复:(有点甜)以下是引用fengwenliuyan在2019/4/8 ... 此主题相关图片如下:001.png |
-- 作者:fengwenliuyan -- 发布时间:2019/4/8 15:18:00 -- 回复:(fengwenliuyan)回复:(有点甜)以下是引用f... 求帮助 |
-- 作者:有点甜 -- 发布时间:2019/4/8 15:30:00 -- If e.OldRange.RowSel >= 0 Then e.Table.grid.Rows(e.OldRange.RowSel+e.Table.HeaderRows).height = e.Table.DefaultRowHeight End If |
-- 作者:fengwenliuyan -- 发布时间:2019/4/8 15:38:00 -- 回复:(有点甜)If e.OldRange.RowSel >= 0 Then&... 那么,在窗口表中,应该怎么做相同的操作呢? |
-- 作者:有点甜 -- 发布时间:2019/4/8 15:40:00 -- 以下是引用fengwenliuyan在2019/4/8 15:38:00的发言:
那么,在窗口表中,应该怎么做相同的操作呢?
写到你主表的afterSelChanged事件即可。
如果要判断表名,加入代码
If e.table.name = "窗口1_Table1" Then \'原来代码 End If |