以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请教:如何真正在单元格中添加按钮?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=147620)

--  作者:y2287958
--  发布时间:2020/3/20 15:24:00
--  请教:如何真正在单元格中添加按钮?
一、以下代码,可以在指定单元格中添加一个按钮,但实际上只是在表的指定位置添加了一个按钮而已,并非真正添加到单元格里面。如果这个单元格的位置超出了表的可见部位,这个按钮就无法生成。
Dim 单元格 = Tables("表A").grid.GetCellRect(1,1)
Dim 表格按钮 As new system.windows.Forms.button
表格按钮.name = "按钮_1"
表格按钮.text = "我的按钮"
表格按钮.left = 单元格.x
表格按钮.top = 单元格.y
表格按钮.width = 单元格.width
表格按钮.height = 单元格.height
表格按钮.font = New Font("宋体",9)
Tables("表A").grid.controls.add(表格按钮)
二、问题:有什么办法将按钮添加到单元格中,就算是这个单元格不在表的可见部分,拉动表的滚动条后一样可以看到?

--  作者:狐狸爸爸
--  发布时间:2020/3/20 15:47:00
--  
单元格不是容器,无法容纳子控件,只能自行设计代码,按钮的位置和单元格的位置同步,参考:


--  作者:y2287958
--  发布时间:2020/3/20 15:54:00
--  
收到