VisualFreeBasic控件_MyDrawWin 窗口外框

2026-1-21 / 0 评论 / 61 阅读

这个是改变窗口外框的控件,放上控件后,运行才效

运行后的效果

可以在窗口属性中增加阴影,效果更好(注意:是主窗口的设计属性,不是控件的)

运行效果

可以修改窗口外壳颜色已经高度

还增加2个常用的窗口按钮,已经可以设置更多小按钮
注意: 按钮ID 设置大点,不然可能被其它控件占用,发生重叠错误

   MyDrawWin1.nButID(0 到 9 共10个) = 10001
   MyDrawWin1.nButTxt(0 到 9 共10个) = "按钮文字"

按钮点击事件,在主窗口的事件中

Sub Form1_WM_Command(hWndForm As hWnd, hWndControl As hWnd, wNotifyCode As Long, wID As Long)
   Select Case wID  '命令ID,设计菜单和工具栏的设置的值。
      Case 10001 ‘和 MyDrawWin1.nButID 设置的相同

      Case 10002

   End Select 
End Sub

假如你窗口上设置了窗口菜单,运行后,菜单也会在窗口外框上面

评论一下?

OωO
取消