- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 单元格里能做个按钮，一点出现一个菜单吗？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=135917)
-- 发布时间：2019/6/5 22:46:00
-- 单元格里能做个按钮，一点出现一个菜单吗？
table控件某个列所有单元格里都做个按钮，一点出现一个下拉菜单吗？
[此贴子已经被作者于2019/6/5 23:23:32编辑过]
-- 发布时间：2019/6/6 9:45:00
--
参考
http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=102154&skin=0
-- 发布时间：2019/6/6 12:50:00
--
e.Form.baseform.opacity = 0
Dim c1table As C1FlexGrid.C1FlexGrid = e.Form.DropTable.Grid
Dim rc As C1FlexGrid.CellRange = c1table.Selection
Dim cellrect As System.Drawing.Rectangle = c1table.RectangleToScreen(c1table.GetCellRect(rc.r1,rc.c1))
e.Form.baseform.width = SysInfo.WorkingAreawidth-cellrect.x
e.Form.baseform.height = SysInfo.WorkingAreaHeight-cellrect.y - 30
老师哪个是弹出菜单的坐标？有点偏，我想调正位置
[此贴子已经被作者于2019/6/6 13:28:11编辑过]
-- 发布时间：2019/6/6 14:57:00
--
上传你具体的实例测试，截图说明要做到的效果。
-- 发布时间：2019/6/10 11:45:00
--
老师怎么在单元格里放一个按钮？
-- 发布时间：2019/6/10 12:05:00
--
参考
http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=103384&skin=0
-- 发布时间：2019/6/10 13:01:00
--
老师我想放某一列里，用哪个属性？
-- 发布时间：2019/6/10 15:07:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:表格嵌入按钮.table |
-- 发布时间：2019/7/3 11:08:00
--
客户要求一进入，所有按钮都显示，我放窗体afterload事件里，改一下，
Dim _flex = Tables("项目").grid
For Each r As Row In Tables("项目").Rows
Dim cell = _flex.GetCellRect(r.Index+Tables("项目").HeaderRows, Tables("项目").Cols("进入").Index+1)
Dim btn1 As new System.windows.Forms.button
btn1.name = "btn_1"
btn1.text = "管理"
btn1.left = cell.x
btn1.top = cell.y
btn1.width = 65
btn1.height = cell.height+1
btn1.tag = r
addhandler btn1.click, addressof button1_click
_flex.controls.add(btn1)
Next
这样写的问题是，调整了列宽，按钮位置不变，初始设置了列宽，按钮的位置不对，没在进入的列里
此主题相关图片如下：１.png
[此贴子已经被作者于2019/7/3 11:07:56编辑过]
-- 发布时间：2019/7/3 11:17:00
--
请上传具体实例测试