跨进程发送消息数据
2016-09-05 17:47
323 查看
//1.发送窗体 procedure TForm2.Button1Click(Sender: TObject); var h: HWND; Size: Integer; CopyDataStruct: TCopyDataStruct; begin h := FindWindow(nil, '接收窗口'); { 按标题查找目标窗口 } if h > 0 then begin Size := ByteLength(Edit1.Text) + 2; { 多出的两个字节用于后面的 #0 } CopyDataStruct.lpData := PChar(Edit1.Text + #0); { 要发送的字符串, #0 表示 PChar 结束} CopyDataStruct.dwData := WM_COPYDATA; { 指定消息类型 } CopyDataStruct.cbData := Size; { 指定要发送的数据的大小 } SendMessage(h, WM_COPYDATA, 0, Integer(@CopyDataStruct)); { 发送 } end; end; //2.接收窗体 //2.1定义接收事件 protected procedure WMCopyData(var Message: TWMCopyData); message WM_COPYDATA; //2.2执行接收事件事 procedure TForm2.WMCopyData(var Message: TWMCopyData); begin Memo1.Lines.Add(PChar(Message.CopyDataStruct.lpData)); end; //2.3改变窗体名 procedure TForm2.FormCreate(Sender: TObject); begin Caption := '接收窗口'; end;
相关文章推荐
- VC/MFC 不同进程间的消息通信与数据(字符串)发送
- 跨进程发送消息数据(发送WM_COPYDATA消息,够简单的)
- 通过消息跨进程发送与接收 TCopyDataStruct 数据 - 回复 "skymesh"
- 通过消息跨进程发送与接收 TCopyDataStruct 数据 - 回复 "skymesh"
- 跨进程消息以及数据发送
- VC/MFC 不同进程间的消息通信与数据(字符串)发送
- VC/MFC 不同进程间的消息通信与数据(字符串)发送
- VC/MFC 不同进程间的消息通信与数据(字符串)发送
- MFC 不同进程间的消息通信与数据(字符串)发送
- [转帖]在C#用WM_COPYDATA消息来实现两个进程之间传递数据
- 如果在C#用WM_COPYDATA消息来实现两个进程之间传递数据
- 发送数据消息
- 内核模块向用户进程发送消息
- 使用消息队列 异步插入数据,能发送消息,但是无法读取消息
- 进程之间通过CWnd::SendMessage(WM_COPYDATA,*,*)发送和获取消息
- 内核模块向用户进程发送消息
- 用任务管理器关闭进程所发送的消息
- BizTalk Server 基于消息的基本数据交换(一) - 发送端口直接订阅接收端口
- BizTalk Server 基于消息的基本数据交换(一) - 发送端口直接订阅接收端口
- 如果在C#用WM_COPYDATA消息来实现两个进程之间传递数据