■■■■加急：sendmessage 怎样在2个程序中传递自定义消息？■■■■在线等待■■■■

[cbxmir]

我的目的就是想让2个程序用sendmessage传递自定义的消息。
我想知道具体的API函数。最好有完整代码~

[sunnychild]

Declare Function CallWindowProc Lib "user32" Alias "CallWindowProcA" (ByVal lpPrevWndFunc As Long, ByVal hwnd As Long, ByVal msg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long

[cbxmir]

但是它是方法啊？
我怎么用啊

[rainstormmaster]

首先向系统注册自定义消息，然后用向所有顶级窗口广播该消息，需要进行子类处理，相关声明如下：
Public Declare Function RegisterWindowMessage Lib "user32" Alias "RegisterWindowMessageA" (ByVal lpString As String) As Long
Public Declare Function BroadcastSystemMessage Lib "user32" Alias "BroadcastSystemMessage" (ByVal dw As Long, pdw As Long, ByVal un As Long, ByVal wParam As Long, ByVal lParam As Long) As Long