- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- FOXTABLE 表格打开收拢 按钮 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=22868)
-- 发布时间：2012/8/25 22:35:00
-- FOXTABLE 表格打开收拢 按钮
最近在学习一个开源的FOXTABLE 编程软件： 扬州华泰ERP.
里面有一个可以控制表格展开-收拢的长条按钮，我不知道该如何设置，也找不到控件。
此主题相关图片如下：1.jpg
就是图片最右边的长条按钮，可以控制记录窗口的出现和消失。
请教了。
-- 发布时间：2012/8/25 23:00:00
--
Tables(
"员工").OpenRecordGrid()-- 发布时间：2012/8/25 23:01:00
--
http://www.foxtable.com/help/topics/1771.htm
-- 发布时间：2012/8/26 6:49:00
-- FOXTABLE 表格打开收拢 按钮
谢谢你的帮助，但是我不明白的是如何做出“可以让表收起打开-显示出记录窗口”的那个长条按钮。
可不可以帮忙解决呢？
-- 发布时间：2012/8/26 14:26:00
--
这个是不是停靠窗口，自动隐藏=TRUE。
-- 发布时间：2012/8/26 14:48:00
--
看图片应该是一个分区面板，如果是，隐藏/显示指定分区面板就行。
可以做一个按钮试试
Dim p As WinForm.SplitContainer = e.Form.Controls("SplitContainer1")
p.Panel2.Collapsed = not p.Panel2.Collapsed
[此贴子已经被作者于2012-8-26 20:45:26编辑过]
-- 发布时间：2012/8/26 20:19:00
-- FOXTABLE 表格打开收拢 按钮
真的不好意思，这个代码我应该放在SPLITECONTAINER 的什么事件里呢？
-- 发布时间：2012/8/26 20:44:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目20.table |
-- 发布时间：2012/8/26 20:47:00
--
为避免闪烁可以将代码改成这样
e.Form.StopRedraw
Dim p As WinForm.SplitContainer = e.Form.Controls("SplitContainer1")
p.Panel2.Collapsed = not p.Panel2.Collapsed
e.Form.ResumeRedraw
-- 发布时间：2012/8/26 21:00:00
-- FOXTABLE 表格打开收拢 按钮
非常感谢。