| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 4114 人关注过本帖
标题:新手请教sendmessage的用法
只看楼主 加入收藏
b13690976754
Rank: 1
等 级:新手上路
威 望:2
帖 子:835
专家分:7
注 册:2006-11-9
收藏
得分:0 
回复:(b13690976754)新手请教sendmessage的用法
图片附件: 游客没有浏览图片的权限,请 登录注册

很多次遇到这个问题 上百度问 有人回答 用户什么什么的 新建了好几个用户也不行。。

If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If
2007-04-19 22:43
ioriliao
Rank: 7Rank: 7Rank: 7
来 自:广东
等 级:贵宾
威 望:32
帖 子:2829
专家分:647
注 册:2006-11-30
收藏
得分:0 

我不是说了么...这不是三言两语说得清楚的...
叫我去回答你这问题我一样要去查api的手册...
你这个问题...解决的的步骤是
1.向这个窗体发送一个消息
问:怎么样才能使这个窗体接收到这个消息.?
答:获得此窗体的句柄

问:怎么样才能获取窗体的句柄?
答:api函数

问:什么api函数?
答:查.....

问:怎么用?
答:查.....


/images/2011/147787/2011051411021524.jpg" border="0" />
2007-04-19 22:51
ioriliao
Rank: 7Rank: 7Rank: 7
来 自:广东
等 级:贵宾
威 望:32
帖 子:2829
专家分:647
注 册:2006-11-30
收藏
得分:0 
上面的问题是什么问题啊...说清楚些么...
你在程序写什么代码会出现这个问题的?

/images/2011/147787/2011051411021524.jpg" border="0" />
2007-04-19 22:54
b13690976754
Rank: 1
等 级:新手上路
威 望:2
帖 子:835
专家分:7
注 册:2006-11-9
收藏
得分:0 

1.向这个窗体发送一个消息
问:怎么样才能使这个窗体接收到这个消息.?
答:获得此窗体的句柄 这个我知道,如果不知道就不会提出这个函数的用法和使用。

问:怎么样才能获取窗体的句柄?
答:api函数 这个回答有点废,就是知道API函数,但不知道用法的具体格式。

问:什么api函数?
答:查..... 这个回答也是废的。如果查能解决一切我就不用这么辛苦天天在等啦。

问:怎么用?
答:查.....这个回答更是废上加废,而且答复的很肤浅。我不是要应付。

附:上面的图片就是 向活动窗口发送信息时 说权限什么的错误。


If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If
2007-04-19 23:00
b13690976754
Rank: 1
等 级:新手上路
威 望:2
帖 子:835
专家分:7
注 册:2006-11-9
收藏
得分:0 
redice 有时间教一下我 好吗?

If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If
2007-04-19 23:23
ioriliao
Rank: 7Rank: 7Rank: 7
来 自:广东
等 级:贵宾
威 望:32
帖 子:2829
专家分:647
注 册:2006-11-30
收藏
得分:0 

你这么有种...就把所有的api函数和它的参数和常量背下来...
就一个sendmessage函数的常量就有下面这么多(还不完整的),你给我记啊..

WM_NULL = 0
WM_CREATE = 1
'应用程序创建一个窗口
WM_DESTROY = 2
'一个窗口被销毁
WM_MOVE = 3
'移动一个窗口
WM_SIZE = 5
'改变一个窗口的大小
WM_ACTIVATE = 6
' 一个窗口被激活或失去激活状态;
WM_SETFOCUS = 7
' 获得焦点后
WM_KILLFOCUS = 8
' 失去焦点
WM_ENABLE = &HA
' 改变enable状态
WM_SETREDRAW = &HB
' 设置窗口是否能重画
WM_SETTEXT = &HC
' 应用程序发送此消息来设置一个窗口的文本
WM_GETTEXT = &HD
' 应用程序发送此消息来复制对应窗口的文本到缓冲区
WM_GETTEXTLENGTH = &HE
' 得到与一个窗口有关的文本的长度 (不包含空字符)
WM_PAINT = &HF
' 要求一个窗口重画自己
WM_CLOSE = 10
' 当一个窗口或应用程序要关闭时发送一个信号
WM_QUERYENDSESSION = 11
' 当用户选择结束对话框或程序自己调用ExitWindows函数
WM_QUIT = 12
' 用来结束程序运行或当程序调用postquitmessage函数
WM_QUERYOPEN = 13
' 当用户窗口恢复以前的大小位置时,把此消息发送给某个图标
WM_ERASEBKGND = 14
' 当窗口背景必须被擦除时 (例在窗口改变大小时)
WM_SYSCOLORCHANGE = 15
' 当系统颜色改变时,发送此消息给所有顶级窗口
WM_ENDSESSION = 16
' 当系统进程发出WM_QUERYENDSESSION消息后,此消息发送给应用程序,
'通知它对话是否结束
WM_SYSTEMERROR = 17
WM_SHOWWINDOW = 18
'当隐藏或显示窗口是发送此消息给这个窗口
WM_ACTIVATEAPP = &H1C
'发此消息给应用程序哪个窗口是激活的,哪个是非激活的;
WM_FONTCHANGE = &H1D
'当系统的字体资源库变化时发送此消息给所有顶级窗口
WM_TIMECHANGE = &H1E
'当系统的时间变化时发送此消息给所有顶级窗口
WM_CANCELMODE = &H1F
'发送此消息来取消某种正在进行的摸态 (操作)
WM_SETCURSOR = 20
'如果鼠标引起光标在某个窗口中移动且鼠标输入没有被捕获时,就发消息给某个窗口
WM_MOUSEACTIVATE = 21
'当光标在某个非激活的窗口中而用户正按着鼠标的某个键发送此消息给当前窗口
WM_CHILDACTIVATE = 22
'发送此消息给MDI子窗口当用户点击此窗口的标题栏,或当窗口被激活,移动,改变大小
WM_QUEUESYNC = 23
'此消息由基于计算机的训练程序发送,通过WH_JOURNALPALYBACK的hook程序
'分离出用户输入消息
WM_GETMINMAXINFO = 24
'此消息发送给窗口当它将要改变大小或位置;
WM_PAINTICON = 26
'发送给最小化窗口当它图标将要被重画
WM_ICONERASEBKGND = 27
'此消息发送给某个最小化窗口,仅当它在画图标前它的背景必须被重画
WM_NEXTDLGCTL = 28
'发送此消息给一个对话框程序去更改焦点位置
WM_SPOOLERSTATUS = &H2A
'每当打印管理列队增加或减少一条作业时发出此消息
WM_DRAWITEM = &H2B
'当button,combobox,listbox,menu的可视外观改变时发送
'此消息给这些空件的所有者
WM_MEASUREITEM = &H2C
'当button, combo box, list box, list view control, or menu item 被创建时
'发送此消息给控件的所有者
WM_DELETEITEM = &H2D
'当the list box 或 combo box 被销毁 或 当 某些项被删除通过LB_DELETESTRING, LB_RESETCONTENT, CB_DELETESTRING, or CB_RESETCONTENT 消息
WM_VKEYTOITEM = &H2E
'此消息有一个LBS_WANTKEYBOARDINPUT风格的发出给它的所有者来响应WM_KEYDOWN消息
WM_CHARTOITEM = &H2F
'此消息由一个LBS_WANTKEYBOARDINPUT风格的列表框发送给他的所有者来响应WM_CHAR消息
WM_SETFONT = 30
'当绘制文本时程序发送此消息得到控件要用的颜色
WM_GETFONT = 31
'应用程序发送此消息得到当前控件绘制文本的字体
WM_SETHOTKEY = 32
'应用程序发送此消息让一个窗口与一个热键相关连
WM_GETHOTKEY = 33
'应用程序发送此消息来判断热键与某个窗口是否有关联
WM_QUERYDRAGICON = 37
'此消息发送给最小化窗口,当此窗口将要被拖放而它的类中没有定义图标,应用程序能返回一个图标或光标的句柄,当用户拖放图标时系统显示这个图标或光标
WM_COMPAREITEM = &H39
'发送此消息来判定combobox或listbox新增加的项的相对位置
WM_GETOBJECT = &H3D
WM_COMPACTING = 41
'显示内存已经很少了
WM_WINDOWPOSCHANGING = 46
'发送此消息给那个窗口的大小和位置将要被改变时,来调用setwindowpos函数或其它窗口管理函数
WM_WINDOWPOSCHANGED = 47
'发送此消息给那个窗口的大小和位置已经被改变时,来调用setwindowpos函数或其它窗口管理函数
WM_POWER = 48 ';(适用于16位的windows)
'当系统将要进入暂停状态时发送此消息
WM_COPYDATA = &H4A
'当一个应用程序传递数据给另一个应用程序时发送此消息
WM_CANCELJOURNAL = &H4B
'当某个用户取消程序日志激活状态,提交此消息给程序
WM_NOTIFY = &H4E
'当某个控件的某个事件已经发生或这个控件需要得到一些信息时,发送此消息给它的父窗口
WM_INPUTLANGCHANGEREQUEST = 50
'当用户选择某种输入语言,或输入语言的热键改变
WM_INPUTLANGCHANGE = 51
'当平台现场已经被改变后发送此消息给受影响的最顶级窗口
WM_TCARD = 52
'当程序已经初始化windows帮助例程时发送此消息给应用程序
WM_HELP = 53
'此消息显示用户按下了F1,如果某个菜单是激活的,就发送此消息个此窗口关联的菜单,否则就
'发送给有焦点的窗口,如果当前都没有焦点,就把此消息发送给当前激活的窗口
WM_USERCHANGED = 54
'当用户已经登入或退出后发送此消息给所有的窗口,当用户登入或退出时系统更新用户的具体
'设置信息,在用户更新设置时系统马上发送此消息;
WM_NOTIFYFORMAT = 55
'公用控件,自定义控件和他们的父窗口通过此消息来判断控件是使用ANSI还是UNICODE结构
'在WM_NOTIFY消息,使用此控件能使某个控件与它的父控件之间进行相互通信
WM_CONTEXTMENU = &H7B
'当用户某个窗口中点击了一下右键就发送此消息给这个窗口
WM_STYLECHANGING = &H7C
'当调用SETWINDOWLONG函数将要改变一个或多个 窗口的风格时发送此消息给那个窗口
WM_STYLECHANGED = &H7D
'当调用SETWINDOWLONG函数一个或多个 窗口的风格后发送此消息给那个窗口
WM_DISPLAYCHANGE = &H7E
'当显示器的分辨率改变后发送此消息给所有的窗口
WM_GETICON = &H7F
'此消息发送给某个窗口来返回与某个窗口有关连的大图标或小图标的句柄;
WM_SETICON = 80
'程序发送此消息让一个新的大图标或小图标与某个窗口关联;
WM_NCCREATE = 81
'当某个窗口第一次被创建时,此消息在WM_CREATE消息发送前发送;
WM_NCDESTROY = 82
'此消息通知某个窗口,非客户区正在销毁
WM_NCCALCSIZE = 83
'当某个窗口的客户区域必须被核算时发送此消息
WM_NCHITTEST = 84 ';//移动鼠标,按住或释放鼠标时发生
WM_NCPAINT = 85
'程序发送此消息给某个窗口当它(窗口)的框架必须被绘制时;
WM_NCACTIVATE = 86
'此消息发送给某个窗口 仅当它的非客户区需要被改变来显示是激活还是非激活状态;
WM_GETDLGCODE = 87
'发送此消息给某个与对话框程序关联的控件,widdows控制方位键和TAB键使输入进入此控件
'通过响应WM_GETDLGCODE消息,应用程序可以把他当成一个特殊的输入控件并能处理它
WM_NCMOUSEMOVE = &HA0
'当光标在一个窗口的非客户区内移动时发送此消息给这个窗口 //非客户区为:窗体的标题栏及窗
' 的边框体
WM_NCLBUTTONDOWN = &HA1
'当光标在一个窗口的非客户区同时按下鼠标左键时提交此消息
WM_NCLBUTTONUP = &HA2
'当用户释放鼠标左键同时光标某个窗口在非客户区十发送此消息;
WM_NCLBUTTONDBLCLK = &HA3
'当用户双击鼠标左键同时光标某个窗口在非客户区十发送此消息
WM_NCRBUTTONDOWN = &HA4
'当用户按下鼠标右键同时光标又在窗口的非客户区时发送此消息
WM_NCRBUTTONUP = &HA5
'当用户释放鼠标右键同时光标又在窗口的非客户区时发送此消息
WM_NCRBUTTONDBLCLK = &HA6
'当用户双击鼠标右键同时光标某个窗口在非客户区十发送此消息
WM_NCMBUTTONDOWN = &HA7
'当用户按下鼠标中键同时光标又在窗口的非客户区时发送此消息
WM_NCMBUTTONUP = &HA8
'当用户释放鼠标中键同时光标又在窗口的非客户区时发送此消息
WM_NCMBUTTONDBLCLK = &HA9
'当用户双击鼠标中键同时光标又在窗口的非客户区时发送此消息
WM_KEYFIRST = 100
WM_KEYDOWN = 100
'//按下一个键
WM_KEYUP = 101
'//释放一个键
WM_CHAR = 102
' //按下某键,并已发出WM_KEYDOWN, WM_KEYUP消息
WM_DEADCHAR = 103
' 当用translatemessage函数翻译WM_KEYUP消息时发送此消息给拥有焦点的窗口
WM_SYSKEYDOWN = 104
' 当用户按住ALT键同时按下其它键时提交此消息给拥有焦点的窗口;
WM_SYSKEYUP = 105
' 当用户释放一个键同时ALT 键还按着时提交此消息给拥有焦点的窗口
WM_SYSCHAR = 106
' 当WM_SYSKEYDOWN消息被TRANSLATEMESSAGE函数翻译后提交此消息给拥有焦点的窗口
WM_SYSDEADCHAR = 107
'当WM_SYSKEYDOWN消息被TRANSLATEMESSAGE函数翻译后发送此消息给拥有焦点的窗口
WM_KEYLAST = 108
WM_INITDIALOG = 110
'在一个对话框程序被显示前发送此消息给它,通常用此消息初始化控件和执行其它任务
WM_COMMAND = 111
'当用户选择一条菜单命令项或当某个控件发送一条消息给它的父窗口,一个快捷键被翻译
WM_SYSCOMMAND = 112
' 当用户选择窗口菜单的一条命令或当用户选择最大化或最小化时那个窗口会收到此消息
WM_TIMER = 113 ' //发生了定时器事件
WM_HSCROLL = 114
'当一个窗口标准水平滚动条产生一个滚动事件时发送此消息给那个窗口,也发送给拥有它的控件
WM_VSCROLL = 115
'当一个窗口标准垂直滚动条产生一个滚动事件时发送此消息给那个窗口也,发送给拥有它的控件 WM_INITMENU = $0116;
'当一个菜单将要被激活时发送此消息,它发生在用户菜单条中的某项或按下某个菜单键,它允许程序在显示前更改菜单
WM_INITMENUPOPUP = 117
'当一个下拉菜单或子菜单将要被激活时发送此消息,它允许程序在它显示前更改菜单,而不要改变全部
WM_MENUSELECT = &H11F
'当用户选择一条菜单项时发送此消息给菜单的所有者 (一般是窗口)
WM_MENUCHAR = 120
'当菜单已被激活用户按下了某个键(不同于加速键),发送此消息给菜单的所有者;
WM_ENTERIDLE = 121
'当一个模态对话框或菜单进入空载状态时发送此消息给它的所有者,一个模态对话框或菜单进入空载状态就是在处理完一条或几条先前的消息后没有消息它的列队中等待
WM_MENURBUTTONUP = 122
WM_MENUDRAG = 123
WM_MENUGETOBJECT = 124


/images/2011/147787/2011051411021524.jpg" border="0" />
2007-04-20 09:41
ioriliao
Rank: 7Rank: 7Rank: 7
来 自:广东
等 级:贵宾
威 望:32
帖 子:2829
专家分:647
注 册:2006-11-30
收藏
得分:0 
WM_UNINITMENUPOPUP = 125
WM_MENUCOMMAND = 126
WM_CHANGEUISTATE = 127
WM_UPDATEUISTATE = 128
WM_QUERYUISTATE = 129
WM_CTLCOLORMSGBOX = 132
' 在windows绘制消息框前发送此消息给消息框的所有者窗口,通过响应这条消息,所有者窗口可以通过使用给定的相关显示设备的句柄来设置消息框的文本和背景颜色
WM_CTLCOLOREDIT = 133
' 当一个编辑型控件将要被绘制时发送此消息给它的父窗口;通过响应这条消息,所有者窗口可以通过使用给定的相关显示设备的句柄来设置编辑框的文本和背景颜色
WM_CTLCOLORLISTBOX = 134
' 当一个列表框控件将要被绘制前发送此消息给它的父窗口;通过响应这条消息,所有者窗口可以通过使用给定的相关显示设备的句柄来设置列表框的文本和背景颜色
WM_CTLCOLORBTN = 135
' 当一个按钮控件将要被绘制时发送此消息给它的父窗口;通过响应这条消息,所有者窗口可以通过使用给定的相关显示设备的句柄来设置按纽的文本和背景颜色
WM_CTLCOLORDLG = 136
' 当一个对话框控件将要被绘制前发送此消息给它的父窗口;通过响应这条消息,所有者窗口可以通过使用给定的相关显示设备的句柄来设置对话框的文本背景颜色
WM_CTLCOLORSCROLLBAR = 137
' 当一个滚动条控件将要被绘制时发送此消息给它的父窗口;通过响应这条消息,所有者窗口可以通过使用给定的相关显示设备的句柄来设置滚动条的背景颜色
WM_CTLCOLORSTATIC = 138
' 当一个静态控件将要被绘制时发送此消息给它的父窗口;通过响应这条消息,所有者窗口可以通过使用给定的相关显示设备的句柄来设置静态控件的文本和背景颜色
WM_MOUSEFIRST = 200
WM_MOUSEMOVE = 200
' // 移动鼠标
WM_LBUTTONDOWN = 201
'//按下鼠标左键
WM_LBUTTONUP = 202
'//释放鼠标左键
WM_LBUTTONDBLCLK = 203
' //双击鼠标左键
WM_RBUTTONDOWN = 204
' //按下鼠标右键
WM_RBUTTONUP = 205
' //释放鼠标右键
WM_RBUTTONDBLCLK = 206
' //双击鼠标右键
WM_MBUTTONDOWN = 207
' //按下鼠标中键
WM_MBUTTONUP = 208
' //释放鼠标中键
WM_MBUTTONDBLCLK = 209
' //双击鼠标中键
WM_MOUSEWHEEL = &H20A
' 当鼠标轮子转动时发送此消息个当前有焦点的控件
WM_MOUSELAST = &H20A
WM_PARENTNOTIFY = 210
' 当MDI子窗口被创建或被销毁,或用户按了一下鼠标键而光标在子窗口上时发送此消息给它的父窗口
WM_ENTERMENULOOP = 211
' 发送此消息通知应用程序的主窗口that已经进入了菜单循环模式
WM_EXITMENULOOP = 212
' 发送此消息通知应用程序的主窗口that已退出了菜单循环模式
WM_NEXTMENU = 213
WM_SIZING = 532
' 当用户正在调整窗口大小时发送此消息给窗口;通过此消息应用程序可以监视窗口大小和位置也可以修改他们
WM_CAPTURECHANGED = 533
'发送此消息 给窗口当它失去捕获的鼠标时;
WM_MOVING = 534
'当用户在移动窗口时发送此消息,通过此消息应用程序可以监视窗口大小和位置也可以修改他们;
WM_POWERBROADCAST = 536
' 此消息发送给应用程序来通知它有关电源管理事件;
WM_DEVICECHANGE = 537
' 当设备的硬件配置改变时发送此消息给应用程序或设备驱动程序
WM_IME_STARTCOMPOSITION = &H10D
WM_IME_ENDCOMPOSITION = &H10E
WM_IME_COMPOSITION = &H10F
WM_IME_KEYLAST = &H10F
WM_IME_SETCONTEXT = 281
WM_IME_NOTIFY = 282
WM_IME_CONTROL = 283
WM_IME_COMPOSITIONFULL = 284
WM_IME_SELECT = 285
WM_IME_CHAR = 286
WM_IME_REQUEST = 288
WM_IME_KEYDOWN = 290
WM_IME_KEYUP = 291
WM_MDICREATE = 220
' 应用程序发送此消息给多文档的客户窗口来创建一个MDI 子窗口
WM_MDIDESTROY = 221
'应用程序发送此消息给多文档的客户窗口来关闭一个MDI 子窗口
WM_MDIACTIVATE = 222
'应用程序发送此消息给多文档的客户窗口通知客户窗口激活另一个MDI子窗口,当客户窗口收到此消息后,它发出WM_MDIACTIVE消息给MDI子窗口(未激活)激活它;
WM_MDIRESTORE = 223
'程序 发送此消息给MDI客户窗口让子窗口从最大最小化恢复到原来大小
WM_MDINEXT = 224
'程序 发送此消息给MDI客户窗口激活下一个或前一个窗口
WM_MDIMAXIMIZE = 225
' 程序发送此消息给MDI客户窗口来最大化一个MDI子窗口;
WM_MDITILE = 226
'程序 发送此消息给MDI客户窗口以平铺方式重新排列所有MDI子窗口
WM_MDICASCADE = 227
' 程序 发送此消息给MDI客户窗口以层叠方式重新排列所有MDI子窗口
WM_MDIICONARRANGE = 228
' 程序 发送此消息给MDI客户窗口重新排列所有最小化的MDI子窗口
WM_MDIGETACTIVE = 229
' 程序 发送此消息给MDI客户窗口来找到激活的子窗口的句柄
WM_MDISETMENU = 230
' 程序 发送此消息给MDI客户窗口用MDI菜单代替子窗口的菜单
WM_ENTERSIZEMOVE = 231
WM_EXITSIZEMOVE = 232
WM_DROPFILES = 233
WM_MDIREFRESHMENU = 234
WM_MOUSEHOVER = &H2A1
WM_MOUSELEAVE = &H2A3
WM_CUT = 300
'程序发送此消息给一个编辑框或combobox来删除当前选择的文本
WM_COPY = 301
'程序发送此消息给一个编辑框或combobox来复制当前选择的文本到剪贴板
WM_PASTE = 302
'程序发送此消息给editcontrol或combobox从剪贴板中得到数据
WM_CLEAR = 303
'程序发送此消息给editcontrol或combobox清除当前选择的内容;
WM_UNDO = 304
' 程序发送此消息给editcontrol或combobox撤消最后一次操作
WM_RENDERFORMAT = 305

WM_RENDERALLFORMATS = 306
WM_DESTROYCLIPBOARD = 307
' 当调用ENPTYCLIPBOARD函数时 发送此消息给剪贴板的所有者
WM_DRAWCLIPBOARD = 308
'当剪贴板的内容变化时发送此消息给剪贴板观察链的第一个窗口;它允许用剪贴板观察窗口来
'显示剪贴板的新内容;
WM_PAINTCLIPBOARD = 309
' 当剪贴板包含CF_OWNERDIPLAY格式的数据并且剪贴板观察窗口的客户区需要重画;
WM_VSCROLLCLIPBOARD = &H30A
WM_SIZECLIPBOARD = &H30B
' 当剪贴板包含CF_OWNERDIPLAY格式的数据并且剪贴板观察窗口的客户区域的大小已经改变是此消息通过剪贴板观察窗口发送给剪贴板的所有者;
WM_ASKCBFORMATNAME = &H30C
' 通过剪贴板观察窗口发送此消息给剪贴板的所有者来请求一个CF_OWNERDISPLAY格式的剪贴板的名字
WM_CHANGECBCHAIN = &H30D
'当一个窗口从剪贴板观察链中移去时发送此消息给剪贴板观察链的第一个窗口;
WM_HSCROLLCLIPBOARD = &H30E
'此消息通过一个剪贴板观察窗口发送给剪贴板的所有者 ;它发生在当剪贴板包含CFOWNERDISPALY格式的数据并且有个事件在剪贴板观察窗的水平滚动条上;所有者应滚动剪贴板图象并更新滚动条的值;
WM_QUERYNEWPALETTE = &H30F
' 此消息发送给将要收到焦点的窗口,此消息能使窗口在收到焦点时同时有机会实现他的逻辑调色板
WM_PALETTEISCHANGING = 310
'当一个应用程序正要实现它的逻辑调色板时发此消息通知所有的应用程序
WM_PALETTECHANGED = 311
' 此消息在一个拥有焦点的窗口实现它的逻辑调色板后发送此消息给所有顶级并重叠的窗口,以此来改变系统调色板
WM_HOTKEY = 312
' 当用户按下由REGISTERHOTKEY函数注册的热键时提交此消息
WM_PRINT = 791
' 应用程序发送此消息仅当WINDOWS或其它应用程序发出一个请求要求绘制一个应用程序的一部分;
WM_PRINTCLIENT = 792
WM_HANDHELDFIRST = 856
WM_HANDHELDLAST = 863
WM_PENWINFIRST = &H380
WM_PENWINLAST = &H38F
WM_COALESCE_FIRST = 390
WM_COALESCE_LAST = &H39F
WM_DDE_FIRST = &H3E0
WM_DDE_INITIATE = WM_DDE_FIRST + 0
' 一个DDE客户程序提交此消息开始一个与服务器程序的会话来响应那个指定的程序和主题名;
WM_DDE_TERMINATE = WM_DDE_FIRST + 1
' 一个DDE应用程序(无论是客户还是服务器)提交此消息来终止一个会话;
WM_DDE_ADVISE = WM_DDE_FIRST + 2
' 一个DDE客户程序提交此消息给一个DDE服务程序来请求服务器每当数据项改变时更新它
WM_DDE_UNADVISE = WM_DDE_FIRST + 3
' 一个DDE客户程序通过此消息通知一个DDE服务程序不更新指定的项或一个特殊的剪贴板格式的项
WM_DDE_ACK = WM_DDE_FIRST + 4
' 此消息通知一个DDE(动态数据交换)程序已收到并正在处理WM_DDE_POKE, WM_DDE_EXECUTE, WM_DDE_DATA, WM_DDE_ADVISE, WM_DDE_UNADVISE, or WM_DDE_INITIAT消息
WM_DDE_DATA = WM_DDE_FIRST + 5
'一个DDE服务程序提交此消息给DDE客户程序来传递个一数据项给客户或通知客户的一条可用数据项
WM_DDE_REQUEST = WM_DDE_FIRST + 6
' 一个DDE客户程序提交此消息给一个DDE服务程序来请求一个数据项的值;
WM_DDE_POKE = WM_DDE_FIRST + 7
' 一个DDE客户程序提交此消息给一个DDE服务程序,客户使用此消息来请求服务器接收一个未经同意的数据项;服务器通过答复WM_DDE_ACK消息提示是否它接收这个数据项;
WM_DDE_EXECUTE = WM_DDE_FIRST + 8
' 一个DDE客户程序提交此消息给一个DDE服务程序来发送一个字符串给服务器让它象串行命令一样被处理,服务器通过提交WM_DDE_ACK消息来作回应;
WM_DDE_LAST = WM_DDE_FIRST + 8
WM_APP = 8000
WM_USER = 400

/images/2011/147787/2011051411021524.jpg" border="0" />
2007-04-20 09:42
redice
Rank: 3Rank: 3
等 级:新手上路
威 望:6
帖 子:902
专家分:0
注 册:2006-12-11
收藏
得分:0 
回复:(b13690976754)redice 有时间教一下我 好吗?...

好的 我就给你写个例子吧

问题描述:向指定标题的窗口“消息接收窗体”发送按键被按下的信息WM_KEYDOWN(发送A键)

(为了让你理解,我们写两个程序,一个用于接收按键信息(A),另一个程序向前面的窗口发送

WM_KEYDOWN信息。)


'第一个程序 (相当于你所说得“泡泡糖”窗体)

’只需要一个窗体就可以了。将form1的caption设置为"消息接收窗体",并在form_Keydown事件处理过

程中写如下代码用于判断消息是否被成功接收到。

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyA Then
MsgBox "成功接受到消息A被按下了!", 0, "报告"
End If
End Sub


'第二个程序(用于向其它窗体发送消息,这里当我们点击command1按钮时向窗体名称为“消息接收窗体

”的窗体发送指定消息)

‘程序流程如下:
1 首先我们要获取标题为“消息接收窗体”的窗体的句柄,以便后面我们向该窗体发送消息。我们是

用Findwindow函数,下面介绍一个这个函数
函数名称:Findwindow
函数功能:用于在当前运行的应用程序窗口中查找和给定字符串匹配的窗口,并返回该窗口句柄
函数声明:略(自己查)
参数说明:IpclassName 指定一个类名字符串,在我们的程序中我们将它设置为"VBNullString"
IpwindowName 制定一个窗体标题,在我们的程序中我们将它设置为“消息接收窗体”
返回值: 如果找到符合条件的窗体则返回该窗体的句柄,如果没有找到返回VBNullString

2 向前面获取的句柄发送消息,使用SendMessage 函数,下面介绍一下这个函数
函数名称:SendMessage
函数功能:向指定窗体发送消息
函数声明:略(自己查)
参数说明:Hwnd 接收对象的句柄 ,在我们的程序中,它对应于上面我们所得到的窗体句柄
WMsg 指定所发送的消息,我们要向窗体发送按键信息,因此这里我们为WM_KEYDOWN
Wparam 指定附加信息,这个参数与消息类型有关。这里为A对应的虚拟键码
Lparam (同上) 这里我们设为1

代码如下:
'函数声明:

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long)
'常量声明:
Private Const WM_KEYDOWN = &H100

Private Sub Command1_Click()
Dim findhwnd As Long
findhwnd = FindWindow(vbNullString, "消息接收窗体")
If findhwnd = vbNullString Then
MsgBox "接受消息窗体没有运行", 0, "报告"
Exit Sub
End If
SendMessage findhwnd, WM_KEYDOWN, 65, 1&
End Sub

到这里这个程序已经完成了,至于要实现你自己的功能 只需要做一点些改就行了
附 (程序)

bMy8N6KK.rar (8.2 KB) 回复:(b13690976754)redice 有时间教一下我 好吗?...


[此贴子已经被作者于2007-4-20 11:41:58编辑过]


鲲鹏数据 - 专业Web数据采集服务提供者
http://www.
2007-04-20 11:41
b13690976754
Rank: 1
等 级:新手上路
威 望:2
帖 子:835
专家分:7
注 册:2006-11-9
收藏
得分:0 
  师傅。。。。。。非常感谢

If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If
2007-04-20 14:19
b13690976754
Rank: 1
等 级:新手上路
威 望:2
帖 子:835
专家分:7
注 册:2006-11-9
收藏
得分:0 
师傅~
Private Const WM_KEYDOWN = &H100 "这个定义什么的呢?
Private Sub Command1_Click()
Dim findhwnd As Long
findhwnd = FindWindow(vbNullString, "消息接收窗体") "为什么运行程序的时候,这个代码会提示类型不匹配呀?“消息接收窗体”是窗体句柄么?
If findhwnd = vbNullString Then "这段又是什么意思呀?
MsgBox "接受消息窗体没有运行", 0, "报告"
Exit Sub
End If
SendMessage findhwnd, WM_KEYDOWN, 65, 1& "这段呢?
End Sub
师傅,你的代码没有注释。我不是很理解,无从改起。

[此贴子已经被作者于2007-4-20 14:58:05编辑过]


If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If
2007-04-20 14:46
快速回复:新手请教sendmessage的用法
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.027929 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved