Control消息处理参考

最新推荐文章于 2022-12-07 19:48:48 发布
最新推荐文章于 2022-12-07 19:48:48 发布
阅读量1.7k 收藏
点赞数
分类专栏： 学习中 文章标签： class c
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/lzmtw/article/details/1564664
版权
Public   Class  Control
     Inherits  Component
     Implements  IOleControl, IOleObject, IOleInPlaceObject, IOleInPlaceActiveObject, IOleWindow, _
                IViewObject, IViewObject2, IPersist, IPersistStreamInit, IPersistPropertyBag, IPersistStorage, _
                IQuickActivate, ISupportOleDropSource, IDropTarget, ISynchronizeInvoke, IWin32Window, _
                IArrangedElement, IBindableComponent, IComponent, IDisposable

     < SecurityPermission(SecurityAction.InheritanceDemand, Flags: = SecurityPermissionFlag.UnmanagedCode), _
    SecurityPermission(SecurityAction.LinkDemand, Flags: = SecurityPermissionFlag.UnmanagedCode) >  _
     Protected   Overridable   Sub  WndProc( ByRef  m  As  Message)
         If  (( Me .controlStyle  And  ControlStyles.EnableNotifyMessage)  =  ControlStyles.EnableNotifyMessage)  Then
             Me .OnNotifyMessage(m)
         End   If
         Select   Case  m.Msg
             Case   1
                 Me .WmCreate((m))
                 Return
             Case   2
                 Me .WmDestroy((m))
                 Return
             Case   3
                 Me .WmMove((m))
                 Return
             Case   7
                 Me .WmSetFocus((m))
                 Return
             Case   8
                 Me .WmKillFocus((m))
                 Return
             Case   15
                 If   Not   Me .GetStyle(ControlStyles.UserPaint)  Then
                     Me .DefWndProc((m))
                     Return
                 End   If
                 Me .WmPaint((m))
                 Return
             Case   & H10
                 Me .WmClose((m))
                 Return
             Case   20
                 Me .WmEraseBkgnd((m))
                 Return
             Case   & H18
                 Me .WmShowWindow((m))
                 Return
             Case   & H19,  & H132,  & H133,  & H134,  & H135,  310 ,  & H137,  & H138,  & H2132,  & H2133,  & H2134,  & H2135,  & H2136,  & H2137,  & H2138,  & H2019
                 Me .WmCtlColorControl((m))
                 Return
             Case   & H20
                 Me .WmSetCursor((m))
                 Return
             Case   & H2B
                 Me .WmDrawItem((m))
                 Return
             Case   & H2C
                 Me .WmMeasureItem((m))
                 Return
             Case   & H2D,  & H2E,  & H2F,  & H39,  & H114,  & H115
                 If   Not  Control.ReflectMessageInternal(m.LParam, (m))  Then
                     Me .DefWndProc((m))
                 End   If
                 Return
             Case   70
                 Me .WmWindowPosChanging((m))
                 Return
             Case   & H47
                 Me .WmWindowPosChanged((m))
                 Return
             Case   & H3D
                 Me .WmGetObject((m))
                 Return
             Case   & H100,  & H101,  & H102,  260 ,  & H105
                 Me .WmKeyChar((m))
                 Return
             Case   & H7E
                 Me .WmDisplayChange((m))
                 Return
             Case   & H4E
                 Me .WmNotify((m))
                 Return
             Case   80
                 Me .WmInputLangChangeRequest((m))
                 Return
             Case   & H51
                 Me .WmInputLangChange((m))
                 Return
             Case   & H53
                 Me .WmHelp((m))
                 Return
             Case   & H55
                 Me .WmNotifyFormat((m))
                 Return
             Case   & H7B
                 Me .WmContextMenu((m))
                 Return
             Case   & H10D
                 Me .WmImeStartComposition((m))
                 Return
             Case   270
                 Me .WmImeEndComposition((m))
                 Return
             Case   & H111
                 Me .WmCommand((m))
                 Return
             Case   & H112
                 If  ((( CInt (m.WParam)  And   & HFFF0)  <>   & HF100)  OrElse   Not  ToolStripManager.ProcessMenuKey((m)))  Then
                     Me .DefWndProc((m))
                     Return
                 End   If
                m.Result  =  IntPtr.Zero
                 Return
             Case   & H117
                 Me .WmInitMenuPopup((m))
                 Return
             Case   & H11F
                 Me .WmMenuSelect((m))
                 Return
             Case   & H120
                 Me .WmMenuChar((m))
                 Return
             Case   & H128
                 Me .WmUpdateUIState((m))
                 Return
             Case   & H200
                 Me .WmMouseMove((m))
                 Return
             Case   & H201
                 Me .WmMouseDown((m), MouseButtons.Left,  1 )
                 Return
             Case   & H202
                 Me .WmMouseUp((m), MouseButtons.Left,  1 )
                 Return
             Case   & H203
                 Me .WmMouseDown((m), MouseButtons.Left,  2 )
                 If   Me .GetStyle(ControlStyles.StandardDoubleClick)  Then
                     Me .SetState( & H4000000,  True )
                 End   If
                 Return
             Case   & H204
                 Me .WmMouseDown((m), MouseButtons.Right,  1 )
                 Return
             Case   & H205
                 Me .WmMouseUp((m), MouseButtons.Right,  1 )
                 Return
             Case   & H206
                 Me .WmMouseDown((m), MouseButtons.Right,  2 )
                 If   Me .GetStyle(ControlStyles.StandardDoubleClick)  Then
                     Me .SetState( & H4000000,  True )
                 End   If
                 Return
             Case   & H207
                 Me .WmMouseDown((m), MouseButtons.Middle,  1 )
                 Return
             Case   520
                 Me .WmMouseUp((m), MouseButtons.Middle,  1 )
                 Return
             Case   & H209
                 Me .WmMouseDown((m), MouseButtons.Middle,  2 )
                 If   Me .GetStyle(ControlStyles.StandardDoubleClick)  Then
                     Me .SetState( & H4000000,  True )
                 End   If
                 Return
             Case   & H20A
                 Me .WmMouseWheel((m))
                 Return
             Case   & H20B
                 Me .WmMouseDown((m),  Me .GetXButton(Util.HIWORD(m.WParam)),  1 )
                 Return
             Case   & H20C
                 Me .WmMouseUp((m),  Me .GetXButton(Util.HIWORD(m.WParam)),  1 )
                 Return
             Case   & H20D
                 Me .WmMouseDown((m),  Me .GetXButton(Util.HIWORD(m.WParam)),  2 )
                 If   Me .GetStyle(ControlStyles.StandardDoubleClick)  Then
                     Me .SetState( & H4000000,  True )
                 End   If
                 Return
             Case   & H210
                 Me .WmParentNotify((m))
                 Return
             Case   530
                 Me .WmExitMenuLoop((m))
                 Return
             Case   & H215
                 Me .WmCaptureChanged((m))
                 Return
             Case   & H282
                 Me .WmImeNotify((m))
                 Return
             Case   & H2A1
                 Me .WmMouseHover((m))
                 Return
             Case   & H2A3
                 Me .WmMouseLeave((m))
                 Return
             Case   & H30F
                 Me .WmQueryNewPalette((m))
                 Return
             Case   & H286
                 Me .WmImeChar((m))
                 Return
             Case   & H2055
                m.Result  =   IIf ((Marshal.SystemDefaultCharSize  =   1 ),  DirectCast ( 1 , IntPtr),  DirectCast ( 2 , IntPtr))
                 Return
             Case   & H318
                 If   Me .GetStyle(ControlStyles.UserPaint)  Then
                     Me .WmPrintClient((m))
                     Return
                 End   If
                 Me .DefWndProc((m))
                 Return
         End   Select
         If  ((m.Msg  =  Control.threadCallbackMessage)  AndAlso  (m.Msg  <>   0 ))  Then
             Me .InvokeMarshaledCallbacks()
         ElseIf  (m.Msg  =  Control.WM_GETCONTROLNAME)  Then
             Me .WmGetControlName((m))
         ElseIf  (m.Msg  =  Control.WM_GETCONTROLTYPE)  Then
             Me .WmGetControlType((m))
         Else
             If  (Control.mouseWheelRoutingNeeded  AndAlso  (m.Msg  =  Control.mouseWheelMessage))  Then
                 Dim  none  As  Keys  =  Keys.None
                none  =  (none  Or   IIf ((UnsafeNativeMethods.GetKeyState( & H11)  <   0 ),  8 ,  0 ))
                none  =  (none  Or   IIf ((UnsafeNativeMethods.GetKeyState( & H10)  <   0 ),  4 ,  0 ))
                 Dim  handle  As  IntPtr  =  UnsafeNativeMethods.GetFocus
                 If  (handle  =  IntPtr.Zero)  Then
                     Me .SendMessage(m.Msg,  DirectCast ((( CInt ( CLng (m.WParam))  <<   & H10)  Or  none), IntPtr), m.LParam)
                 Else
                     Dim  zero  As  IntPtr  =  IntPtr.Zero
                     Dim  desktopWindow  As  IntPtr  =  UnsafeNativeMethods.GetDesktopWindow
                     Do   While  (((zero  =  IntPtr.Zero)  AndAlso  (handle  <>  IntPtr.Zero))  AndAlso  (handle  <>  desktopWindow))
                        zero  =  UnsafeNativeMethods.SendMessage( New  HandleRef( Nothing , handle),  & H20A,  CInt ((( CInt ( CLng (m.WParam))  <<   & H10)  Or  none)), m.LParam)
                        handle  =  UnsafeNativeMethods.GetParent( New  HandleRef( Nothing , handle))
                     Loop
                 End   If
             End   If
             If  (m.Msg  =  NativeMethods.WM_MOUSEENTER)  Then
                 Me .WmMouseEnter((m))
             Else
                 Me .DefWndProc((m))
             End   If
         End   If
     End Sub

End Class
 
水如烟
关注
专栏目录
MFC消息处理学习总结
bcbobo21cn的专栏
04-08 5946
Windows消息机制概述 http://www.cppblog.com/suiaiguo/archive/2009/07/18/90412.html 消息是指什么？      消息系统对于一个win32程序来说十分重要，它是一个程序运行的动力源泉。一个消息，是系统定义的一个32位的值，他唯一的定义了一个事件，向 Windows发出一个通知，告诉应用程序某个事情发生了。例如，单击鼠标
Apollo之Canbus处理来自Control的Cmd
M_Alan_walker的博客
03-26 4060
简述canbus apollo项目中canbus模块的主要作用是接收Control模块发布的指令，然后将指令解析为CAN协议报文与车辆的ECU交互，且得到指令的反馈信息，并将反馈结果发布为车辆底盘信息（Chassis_detail）。 先看一下这个Chassis_detail是什么：apollo_cidi/modules/canbus/proto/chass...
系统出错信息设计
lincnl的专栏
12-05 2963
文件状态： [√] 草稿 [ ] 正式发布 [ ] 正在修改 文件标识： DWR-WRALM-DS-DTDS 当前版本： 0.928 作者： 郑力 完成日期： 2004-09-28 版 本 历 史 版本/状态 作者 参与者 起止日期 备注 草稿 郑力 0.9.918 草稿 郑力 2004-09-21 2004-09-21 草稿 郑力 2004-09-28 2004-09-28 1 文档介绍 1.1
ControlStyles（枚举）
weixin_33910137的博客
09-08 212
指定控件的样式和行为。 此枚举有一个 FlagsAttribute 特性，通过该特性可使其成员值按位组合。属性： ContainerControl:如果为true，则控件是类似容器的控件。 UserPaint:如果为true，控件将自行绘制，而不是通过操作系统来绘制。如果为false，将不会引发 System.Windows.Forms.Control.Paint事件。此样式...
邮箱-Mailbox
二月初二
11-11 1万+
       Actor之间发送消息，并不是直接通过API的方式直接实现，而是依赖于自己的邮箱（mailbox）。这就好比在旧社会中，大家进行信件交流，发件人把自己的信件放到自己的邮箱中，送件人每天早上从你的邮箱中取出信件，在这个过程中，邮箱就起到了中间存储作用，所有的信件都会放在里面。在Actor系统中，邮箱是一个队列结构，默认遵循FIFO，可以根据我们的需要自定义。        Actor...
Overleaf 参考文献的处理
热门推荐
qq_41386947的博客
01-06 1万+
本文提供了Overleaf中使用BibTex引用参考文献的具体步骤
NR PUSCH power control
最新发布
asd199086的博客
12-07 8131
如果UE有配置SRI-PUSCH-PowerControl，其中有不止一个p0-PUSCH-AlphaSetId，这时候收到了DCI 带有SRI field，要根据SRI 与SRI-PUSCH-PowerControlId的映射关系，SRI-PUSCH-PowerControlId有对应的P0-PUSCH-AlphaSetId，找到P0-PUSCH-AlphaSetId->p0，这个p0值作为P o_UE_PUSCH,b,f,c(j)。没有配置就是功率累加方式。
C# Message 消息处理
u011555996的博客
03-19 5139
一、消息概述 Windows下应用程序的执行是通过消息驱动的。消息是整个应用程序的工作引擎，我们需要理解掌握我们使用的编程语言是如何封装消息的原理。C#自定义消息通信往往采用事件驱动的方式实现，但有时候我们不得不采用操作系统的消息通信机制，例如在和底层语言开发的DLL交互时，是比较方便的。下面列举了一些实现方式，供大家参考. 1 什么是消息(Message) 消息就是通知...
MFC Edit Control 的使用方法
weixin_40406659的博客
11-24 3351
MFC用了两年了，各种控件的使用方法总是记不住，这次让俺来记录一下，省的每次都要自己查教程或者参考之前做过的实例。 首先新建一个MFC应用程序（基于对话框、单文档或者多文档都行），新建一个对话框，拖一个Edit Control到对话框上，有需要的话要更改ID或者其他属性。   给对话框添加一个类：【右键】-&gt;【添加类】-&gt;【输入类名】-&gt;【确定】 给控件添加对应的函数...
C++消息处理[参考].pdf
10-11
- `ON_CONTROL(通知码, nID, fn)`：处理特定控件通知码的消息。 - `ON_CONTROL_RANGE(通知码, nFirstID, nEndID, fn)`：处理一系列控件ID的相同通知码。 - `ON_NOTIFY(通知码, nID, fn)`：处理`NMHDR`结构体定义...
ControlCAN_controlCAN.dll_vci_opendevice_controlcan_周立功CANlabvie
10-04
`controlcan`可能是库的一个特定模块或者命名约定，用于处理CAN总线的相关操作，如发送和接收CAN消息、设置过滤器、管理CAN节点等。`周立功CANlabview`可能指的是一个特定的第三方工具或教程，由周立功（一位知名的...
trafficcontrol:Apache Traffic Control是内容交付网络的开源实现
03-05
Traffic Control中的缓存服务器可以高效地处理大量请求，减轻源服务器的压力，并减少网络传输距离。 2. **负载均衡器（Load Balancer）**：根据实时的网络条件和服务器负载，将用户请求智能地分发到不同的缓存...
ControlCAN库.7z
10-21
接口函数库（二次开发库）使用说明书.pdf"详细阐述了ControlCAN库的使用方法、接口说明及示例代码，是开发者进行二次开发的重要参考资料。 在实际应用中，ControlCAN库广泛应用于汽车电子、工业自动化、轨道交通、...
双击可编辑单元格的ListControl控件
11-26
标题中的“双击可编辑单元格的List...总的来说，实现双击编辑ListControl单元格的功能需要对MFC和Windows消息机制有深入理解，以及熟练掌握CListCtrl类的使用。这个特性使得用户界面更加友好，提高了数据输入的效率。
VS MFC之List Control控件的使用
PtaQ的博客
11-28 7293
先上图，基本功能实现就是这样一个状态，后面我会在陆续添加一些属性及功能，先记录一下实现的步骤 1.新建一个工程文件，在界面上新建一个“List Control”控件，首先把它的“View”设置为“Report（报表）”模式，这个很重要，要不然到时候什么也不会显示，也不会报错 2.为这个“List Control”控件关联“CListCtrl”类型变量，然后在这个工程文件的“*Dlg.c...
尝试给微软汉字拼音ChineseChar类添加注音功能
水如烟
12-01 2904
Author:水如烟贴子在论坛里:Microsoft Visual Studio International Pack 1.0 Beta1(2007/11/28)
学习System.Time.Remoting命名空间
水如烟
01-11 2276
学习System.Time.Remoting命名空间  LzmTW  1/11/2005http://blog.csdn.net/lzmtw 目的：摘要学习本命名空间部分内容，掌握关键细节，解决目前程序中存在的一些技术问题。 外来参考者阅读本文应注意：本人基本概念浅薄，也不会依常规的概念来表达自己的思想，以下内容仅是自己的理解。错误多多，慎读，切切。关联
学习委托
水如烟
11-21 2072
先看看一些法律条文上有关委托—代理的陈述： 见：大道法律网1、  什么是代理：代理，是指代理人以被代理人（又称本人）的名义，在代理权限内与第三人（又称相对人）为法律行为，其法律后果直接由被代理人承受的民事法律制度。其中，代为他人实施民事法律行为的人，称为代理人；由他人以自己的名义代为民事法律行为，并承受法律后果的人，称为被代理人。代理活动涉及到三方主体，其整体是代理法律关系，又包含
UCGUI多对话框支持与消息处理机制深度解析
本文深入探讨了UCGUI（User Control Graphical User Interface）的窗体管理和消息处理机制，重点关注了多对话框、模态窗体以及透明窗体的支持。文章作者通过分析UCGUI的源码，揭示了UCGUI为何仅支持单个对话框窗体，...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值