Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共2 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:[求助]主窗口最小化拦截

1楼
张松波 发表于:2024/1/17 9:14:00
老师,我想阻断BaseMainForm的最小化让其变成透明而不是最小化状态,以下代码,请帮忙看看哪里写错了,谢谢。
Public Class MainForm
    Inherits System.Windows.Forms.Form

    Const WM_SYSCOMMAND As Long = &H112
    Const SC_MINIMIZE As Long = &HF020
    
    Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)
        If m.Msg = WM_SYSCOMMAND AndAlso m.WParam.ToInt32() = SC_MINIMIZE AndAlso BaseMainForm.CanFocus AndAlso Application.OpenForms.Count = 1 Then
            BaseMainForm.Opacity = 0
            Return
        End If
        MyBase.WndProc(m)
    End Sub
End Class
2楼
有点蓝 发表于:2024/1/17 9:25:00
做不到的。

上面代码只能拦截MainForm的最小化,和BaseMainForm没有什么关系。要继承BaseMainForm才行(如Inherits BaseMainForm),但是BaseMainForm是无法继承的,就算能继承了也用不了了。
共2 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .03906 s, 2 queries.