- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]UpRefresh() (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=113504)
-- 发布时间：2018/1/17 9:49:00
-- [求助]UpRefresh()
老师，
UpRefresh() 刷新SplitContainer怎么写，例:
Dim btnSpliter1 As WinForm.SplitContainer= e.Form.Controls("spl_all")
e.Form.StopRedraw
FoxS（btnSpliter1）.UpRefresh()
e.Form.ResumeRedraw
[此贴子已经被作者于2018/1/17 10:10:21编辑过]
-- 发布时间：2018/1/17 9:59:00
--
如何写全局代码 强制刷新页面中的SplitContainer
Public Class FoxS
Private WithEvents _sp As Windows.Forms.SplitContainer
Sub New(sp As Foxtable.WinForm.SplitContainer)
_sp = sp.BaseControl
End Sub
Public Shared Sub UpRefresh()
RaiseEvent Ref()
End Sub
Private Sub FoxS_Ref() Handles Me.Ref
_sp.Refresh()
End Sub
End Class
-- 发布时间：2018/1/17 10:49:00
--
上传实例具体说明你要做什么。
-- 发布时间：2018/1/17 13:49:00
--
老师，
如例子，如何切换隐藏，点击窗口的“切换隐藏”，使SPL 的状态转为正常状态。全局代码的代码怎么改？
[此贴子已经被作者于2018/1/17 14:17:58编辑过]
-- 发布时间：2018/1/17 14:59:00
--
Dim obj = e.Form.Controls("SplitContainer1").basecontrol
obj.refresh
-- 发布时间：2018/1/17 15:37:00
--
老师 ，
4楼的例子怎么改呢？
-- 发布时间：2018/1/17 15:44:00
--
老师，
如何模拟点击 SplitContainer 中间的分割线
-- 发布时间：2018/1/17 16:06:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:分区面板隐藏.foxdb |
-- 发布时间：2018/1/17 16:32:00
--
老师，
我的意思 是切换到原始状态
此主题相关图片如下：qq图片20180117163211.png
-- 发布时间：2018/1/17 17:07:00
--
1、你还原的目的是什么？为什么要还原？
2、如果你需要转换其显示的样式等，你可以修改 paint 事件代码。