另类屏蔽系统键(Ctrl+Alt+Del)兼谈www.vbaccelerator.com网站

    技术2022-05-11  145

            学习技术最好的方式就是拜读优秀的源码,不仅让你学习到先进的技术,更教会你如何编码:编码的风格、注释、思路等等。这段时间我给我自己定了一个目标,就是研究优秀的源码:MenuHook、Skins、Form++等等。

            在www.vbaccelerator.com上看到了一篇关于创建桌面的代码,代码很简短,用了几个API函数,就实现了新桌面的创建,这个新桌面与我们的默认的桌面没有任何关系,在我们新的桌面上你可以打开相应的应用程序。其实本质上它不是“屏蔽”了系统键(Ctrl+Alt+Del),这三个键系统照样相应,只不过windows任务管理器出现在默认桌面,在新创建的桌面没有显示罢了,不过效果却达到了(此外、windows其它的系统键也一概是这样被屏蔽了)。这种方法对工控开发很有好处,因为工业监控程序都是全屏,并且独占系统的资源(一般不允许打开非监控程序的软件),所以新开一个桌面给工控程序用是完全可能和有必要的,并且效果绝佳(并不需要用各种技术来屏蔽系统键了),此外在程序中我们还可以检测自己运行在哪一个桌面的,如果不是预定的桌面,我们的程序可以拒绝运行,这样可以避免一些非独立的组件单独被加载。

           这是创建桌面的关键源码,具体请上www.vbaccelerator.com网站查看。

     '*************************************************************************'**函 数 名:Create'**输    入:ByVal sDesktopName(String) -'**输    出:无'**功能描述:创建一个指定名称的左面'**全局变量:'**调用模块:'**作    者:叶帆'**日    期:2005-12-27 12:01:48'**修 改 人:'**日    期:'**版    本:V1.0.3'*************************************************************************Public Sub Create(ByVal sDesktopName As String)    Dim lR As Long        '返回当前线程所在的桌面句柄    m_hDesktopThreadOld = GetThreadDesktop(GetCurrentThreadId())        '判断DLL调用是否有误    ApiErrorHandler Err.LastDllError, (m_hDesktopThreadOld = 0)        '当前选择的桌面    m_hDesktopInputOld = OpenInputDesktop(0, False, DESKTOP_SWITCHDESKTOP)    ApiErrorHandler Err.LastDllError, (m_hDesktopInputOld = 0)        '创建桌面    m_hDesktop = CreateDesktop(StrPtr(sDesktopName), ByVal 0&, ByVal 0&, 0, GENERIC_ALL, ByVal 0&)    ApiErrorHandler Err.LastDllError, (m_hDesktop = 0)        If Not (m_hDesktop = 0) Then        lR = SetThreadDesktop(m_hDesktop)        lR = SwitchDesktop(m_hDesktop)        m_sDesktop = sDesktopName    End If

    End Sub

    '*************************************************************************'**函 数 名:ClearUp'**输    入:无'**输    出:无'**功能描述:'**全局变量:'**调用模块:'**作    者:叶帆'**日    期:2005-12-27 13:00:27'**修 改 人:'**日    期:'**版    本:V1.0.3'*************************************************************************Public Sub ClearUp()    If Not (m_hDesktopInputOld = 0) Then        SwitchDesktop m_hDesktopInputOld           '设置为默认的桌面        m_hDesktopInputOld = 0    End If    If Not (m_hDesktopThreadOld = 0) Then        SetThreadDesktop m_hDesktopThreadOld       '默认原桌面线程        m_hDesktopThreadOld = 0    End If    If Not (m_hDesktop = 0) Then        CloseDesktop m_hDesktop                    '关闭新创建的桌面        m_hDesktop = 0    End IfEnd Sub

    ==========================================

           www.vbaccelerator.com网站真是一个国外较为优秀的VB开源网站,虽然在2005年之前就停止更新了,不过上面的技术还是值得我们深入研究的。

          仔细研究网站上面的源码,你发现几乎所有的源码都会引用一个SSubTmr6.dll组件,其实这个组件是VB开发的一个COM(进程内组件),实现的就是窗口的子类功能(此外包含一个API 创建的定时器)。

          此外用的最多的就是GUI库的API,大都是创建一个内存DC,在此基础上用API进行内存DC操作。由于我MFC大部分做的都是后台驱动,所以GUI的知识掌握不太多,所以看这部分就比较吃力,所以我觉的要想学习好windows编程,VC必须要学,因为它从底层向你展现程序实现的细节,你能理解并且可以设计出更高级的应用。

         谈点自己的感触:如果把VB仅仅当成一个工具,那是非常好的事,如果把它作为全部,那是最可悲的事。观摩高手的编码,无一不显示这个高手对底层精湛的了解。读读梁肇新的《编程高手箴言》也许你感悟更多。

        

     


    最新回复(0)