因为记录类型可以一次传递多个数据过去
-
等级
本版专家分：308结帖率 100% -
用SendMessage在不同应用程序之间传送消息，如何传送Record记录类型到另一个应用程序，对方如何接收，大家帮忙想想办法.
因为记录类型可以一次传递多个数据过去展开阅读全文
-
等级
本版专家分：132187勋章
-
- 签到新秀 累计签到获取，不积跬步，无以至千里，继续坚持！
-
-
名人
2019年 荣获名人称号
2013年 荣获名人称号
-
- 状元 2012年 总版技术专家分年内排行榜第一
-
-
进士
2013年 总版技术专家分年内排行榜第七
2011年 总版技术专家分年内排行榜第五
2009年 总版技术专家分年内排行榜第九
-
-
可以使用内存映射,在两个程序间共享内存
具体的可以参考<Delphi下深入Windows核心编程>的实例代码
-
等级
本版专家分：980 -
楼上说的对，把记录写入内存映射文件中，然后发消息让另一个程序去读。
-
等级
本版专家分：36869勋章
-
- 红花 2009年1月 Delphi大版内专家分月排行榜第一
-
-
黄花
2009年4月 Delphi大版内专家分月排行榜第二
2009年3月 Delphi大版内专家分月排行榜第二
2009年2月 Delphi大版内专家分月排行榜第二
2008年12月 Delphi大版内专家分月排行榜第二
-
-
郵檂，管道。
或者采用 RegisterWindowMessage 來發送也行的。
-
等级
本版专家分：308
-
我找了些资料，看到用wm_copydata消息可以实现，但具体的怎么发送，和接收方如何接收的代码知道怎么写，有没有做过的朋友，给点例子看看，谢谢！
-
等级
本版专家分：980
-
对于少量数据可以用WM_COPYDATA方便地实现通信。由于SendMessage()是阻塞的，只有接收方响应了消息，SendMessage()才能返回，否则一直阻塞。所以，对于大量数据来说，用SendMessage()就容易造成窗口假死。
SendMessage(WM_COPYDATA,wParam,lParam)
其中wParam设置为包含数据的窗口句柄，lParam指向一个COPYDATASTRUCT的结构，其定义为：
typedef struct tagCOPYDATASTRUCT{
DWORD dwData;
DWORD cbData;
PVOID lpData;
}COPYDATASTRUCT;
其中 dwData为自定义数据， cbData为数据大小， lpData为指向数据的指针。需要注意的是，WM_COPYDATA消息保证发送的数据从原进程复制到目标进程。但是，WM_COPYDATA消息不能发送HDC、HBITMAP之类的东西，它们对于目标进程来说是无效的。目标进程得到这些数据不能在原进程作任何事情，因为它们属于不同的进程。
-
等级
本版专家分：308
-
其实我的功能很简单，我就是要把进程1中的x,y,i,j,k,o(integer类型)这几个变量的值传到进程2，就是这么简单，两个进程都是我自己写的。我只要在进程1中用WM_COPYDATA发消息出来，在进程2中来识别消息是不是发给进程2的，如果是，就把数据去提取出来。
我用下面的方法试了一下，发现结果不正确，大家帮我看看：
发送消息进程1:
procedure TForm1.Button1Click(Sender: TObject);
type
TT = packed record
x: integer;
y: integer;
...
end;
var
A: TT;
begin
A.x := 23;
A.y := 34;
...
SendMessage(HWND_BROADCAST, wm_copydata, 2, integer(@A));
end;
接收消息的进程2：
procedure TForm1.WndProc(var Message: TMessage);
type
TT = packed record
x: integer;
y: integer;
...
end;
var
T: TT;
C: TCopyDataStruct;
begin
if message.Msg = WM_COPYDATA then
begin
C := TCopyDataStruct(Pointer(Message.LParam)^);
T := TT(C.lpData^);
memo1.Lines.Add('x:' + inttostr(T.x));
memo1.Lines.Add('y:' + inttostr(T.y));
...
end
else
inherited;
end;
最后得到的结果不正确，全部是大于实际数，我这种方法对不对，是不是两个进程之间这样操作有问题？
-
等级
本版专家分：308
-
问题解决，方法如下：
发送消息进程1:
procedure TForm1.Button1Click(Sender: TObject);
type
TT = packed record
x: integer;
y: integer;
k: ShortString;
o: real;
end;
var
A: TT;
P: TCopyDataStruct;
begin
A.x := 35;
A.y := 45;
A.k := 'abcdefg';
A.o := 12.3652;
P.dwData := i;
P.cbData := Sizeof(A);
P.lpData := @A;
SendMessage(HWND_BROADCAST, WM_COPYDATA, 1, Cardinal(@P));
end;
接收消息的进程2：
procedure TForm1.WndProc(var Message: TMessage);
type
TT = packed record
x: integer;
y: integer;
k: ShortString;
o: real;
end;
var
T: TT;
C: TCopyDataStruct;
begin
if message.Msg = WM_COPYDATA then
begin
C := TCopyDataStruct(Pointer(Message.LParam)^);
T := TT(C.lpData^);
memo1.Lines.Add('x:' + inttostr(T.x));
memo1.Lines.Add('y:' + inttostr(T.y));
memo1.Lines.Add('y:' + T.k);
memo1.Lines.Add('y:' + floattostr(T.o));
end
else
inherited;
end;
- 两个winform.exe程序之间的通讯一发送消息
两个winform.exe程序之间的通讯一————————发送消息 https://blog.csdn.net/weixin_41609327/article/details/82786702 2018年09月20日 14:42:00 左左在右边 阅读数：1222 1，两个winform.exe在系统里体现是...
- SendMessage和PostMessage发送消息（不同进程传递字符串）
SendMessage函数将指定的消息发送到一个或多个窗口。此函数为指定的窗口调用窗口程序，直到窗口程序处理完消息再返回。而函数PostMessage不同，将一个消息寄送到一个线程的消息队列后立即返回。 二、函数原型 ...
- python中sendmessage的使用_SendMessage函数的常用消息及其应用大全
它属于标准Windows编辑控件的一个子类,所以它支持所有编辑控件消息。这儿讲述的技术也适用于由其他厂商设计的,以Windows编辑控件类为基础的其他控件。函数原型：DeclareFunctionSendMessageLib"user32"Alias...
- 两个应用程序之间的通信
应用程序之间的数据交换（互相通讯）一直是困扰广大... 在硬盘上建立一个文件，一个应用程序往该文件里写数据（可以不关闭文件，但必须刷新缓冲区），另一个应用程序以共享方式打开这个文件并读取其中的内容，这便
- 请问在两个程序之间如何通信？
进程间通讯
- 应用程序之间互相通讯的几种方法
应用程序之间的数据交换（互相通讯）一直是困扰广大程序员的难题，尽管已经出现了各式各样的解决方案，但迄今为止没有哪一种方案是完美无缺的。因此，只有学习并了解了它们的优缺点后，才能在特定的情况下选择最佳...
- 利用SendMessage和FindWindow，给其他进程发消息
当某个程序要给另一个程序发消息时，可以利用下面2个函数。注意，必须知道另一个进程的主窗口名（顶级窗口，也就是程序运行时的title标题。） 问题描述：...
- SendMessage 的各种参数
SendMessage函数的常用消息及其应用(有点长，希望能对大家有所帮助) 函数原型： Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, _ ByVal wMsg As Long, ByVal wParam...
- SendMessage函数的常用消息及其应用
它属于标准 Windows 编辑控件的一个子类,所以它支持所有 编辑控件消息?这儿讲述的技术也适用于由其他厂商设计的 , 以Windows编辑控件类为基础的其他控件? 函数原型: Declare Function SendMessage Lib "user32" ...
- Win32应用程序开发：完整的开发流程
其实对于C++，难点当然不局限在指针这玩意儿上，还有一些有趣的概念，如模板类、虚基类、纯虚函数等，这些都是概念性的东西，几乎每一本C++书上都会介绍，而平时我们除了会接触到纯虚函数外，其他的不多用。...
- 【delphi】SendMessage使用教程
函数功能：该函数将指定的消息发送到一个或多个窗口。此函数为指定的窗口调用窗口程序，直到窗口程序处理完消息再返回。而函数PostMessage不同，将一个消息寄送到一个线程的消息队列后立即返回。 函数原型：...
- Android消息传递机制总结
业务层的核心灵魂就是层层的消息传递，今天就来总结一下andorid的应用层的各种消息传递。1.线程间通讯 ——— Handler，HandlerThread等。 2.组件间通信 ——— BroadcastReceiver，接口回调等。 3. 第三方通信 ...
- Delphi中SendMessage使用说明
函数功能：该函数将指定的消息发送到一个或多个窗口。此函数为指定的窗口调用窗口程序，直到窗口程序处理完消息再返回。而函数PostMessage不同，将一个消息寄送到一个线程的消息队列后立即返回。 函数原型：LRESULT ...
- SendMessage函数的常用消息及其应用大全
文本框控件通常用于输入和...它属于标准Windows编辑控件的一个子类,所以它支持所有编辑控件消息。这儿讲述的技术也适用于由其他厂商设计的,以Windows编辑控件类为基础的其他控件。 函数原型：DeclareFunction...
- 关于C#中实现两个应用程序消息通讯的问题
最近项目中需要在两个应用程序之间通讯，这里的两个程序是在一台机器上，看了csdn上的一篇文章《如何在C#用WM_COPYDATA消息来实现两个进程之间传递数据》，原理是讲清楚了，但使起来很不爽，决定自己封装一下，满足...
- vc中使用SendMessage正确发送自定义消息
最近在用VC2008做开发，后来由于要用到消息的发送，而且需要自定义消息，在网上查找了很多例子，根据他们所说的，虽然大致都差不多，但是基本上没有一个能完全做出来的。要知道VC编程有一个小地方出错，都可能是个让...
- Windows程序的窗口和消息 -- 一个Windows程序从生到死
注：以下内容为学习笔记，多数是从书本、资料中得来，只为加深印象，及日后参考。...1.一个完整的Windows程序 /*------------------------------------------------------------------------------
- SendMessage函数的常用消息及其应用 1
SendMessage函数的常用消息及其应用 http://hi.baidu.com/%CD%E6%CB%E6/blog/item/6aebf81018da261bb9127bcc.html 文本框控件通常用于输入和编辑文字。它属于标准 Windows 编辑控件的一
- SendMessage 详解
窗体操作；控件；文本；系统操作等等。 ...归类自己需要的资料，慢慢爬行 ...vb sendmessage 详解1 ...SendMessage函数的常用消息及其应用(有点长，希望能对大家有所帮助) 函数原型： Declare Function S
- 将 RTC 客户端 API 用于可缩放的应用程序
Microsoft Corporation2003 年 10 月 适用于： Microsoft® 实时通信客户端 API 1.2 版 Live Communications Server 即时消息应用程序 摘要：在大多数情况下，Microsoft 实时通信 (RTC) 客户端应用程序编程接口 (API...
- SendMessage(PostMessage)详解
Windows API（应用程序接口）是Windows系列软件为程序开发人员提供的火力强大的“武器库”，在这个武器库中，有很多极具威力的武器，SendMessage就是其中之一，它的功能非常丰富，灵活使用这个函数，会给编程工作...
- 应用程序间通信
孙鑫VC 17集 进程间通信 VC++实现串口通信的应用程序...一个主应用程序调用另一个应用程序后， 要保持它们之间的数据交换， 如何实现？ 相对来说，内存共享灵活性较大，消息传递实现简单 这种问题问得太多了
- 2020美赛C题题目.rar
Problem C: 电商里的数据财富 在电商市场中，亚马逊为消费者提供了对购买商品的评价（打分和评论）的服务。个人评级，又称为“星级评级”，意思是允许消费者使用1(低分差评，低满意度)到5(高分好评，高满意度)的等级来表达他们对产品的满意度。此外，消费者可以提交基于文本的信息，“评论”——表示对产品的进一步意见和信息。其他顾客可以在这些评论上打分，判断评论是否对他们有帮助，这又被称为“有用评分”，以帮助他们决定产品的购买决策。公司利用这些数据来洞察他们所参与的市场、参与的时机以及产品设计特性选择的潜在商机。
- OpenGL ES2.0基础
初级学习OpenGL ES2.0的课程，从无到有，从进本的函数讲起，每一课时都附带一个例子程序。深入浅出的讲解可编程管线技术，令人费解的文理，以及混合技术，各种优化技术：顶点缓冲区，索引缓冲区，帧缓冲区，介绍精灵的使用，并使用shader制作粒子特效。 掌握OpenGL ES2.0可编程管线，以及OpenGLES2.0的特性，带领初学者入门。
- 2019美赛ABCDEF题题目（附C题数据）
2019美赛题目，完全是从官网下载，无翻译，可使用有道软件翻译浏览
- 嵌入式Linux项目实战：三个大项目(数码相框、摄像头驱动和电源管理),九个衍生项目视频教程
包括3个大项目和若干衍生项目，涵盖：数码相框、电子书、指针、链表、Makefile、网络编程Socket、USB摄像头、CMOS摄像头、视频监控、WIFI、3G网卡、ALSA声卡、便携式视频监控（
- 自己动手从0到1写嵌入式操作系统
这不是rtos源码分析的课程，而是为初级的同学设计，从基础原理讲师，一步步不断迭代设计rtos的课程！ 用不到【2000行代码，汇编代码仅18行】（不含注释）实现一个精巧的可以运行在ARM Cortex-M内核芯片上
- python爬虫20个案例
讲诉python爬虫的20个案例 。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。
- 抢茅台jd_seckill-master 来自huanghyw
本仓库发布的jd_seckill项目中涉及的任何脚本，仅用于测试和学习研究，禁止用于商业用途，不能保证其合法性，准确性，完整性和有效性，请根据情况自行判断。 本项目内所有资源文件，禁止任何公众号、自媒体进行任何形式的转载、发布。 huanghyw 对任何脚本问题概不负责，包括但不限于由任何脚本错误导致的任何损失或损害. 间接使用脚本的任何用户，包括但不限于建立VPS或在某些行为违反国家/地区法律或相关法规的情况下进行传播, huanghyw 对于由此引起的任何隐私泄漏或其他后果概不负责。 请勿将jd_seckill项目的任何内容用于商业或非法目的，否则后果自负。
- 茅台、鞋子、手机、抢购、软件，抢购秒杀
最近各大电商平台不断持续放货，京东，天猫，苏宁，网易等，还有新加入的大军，酒仙网，，国美，华润万家和主播等等……给平台带去了巨大流量。 看到很多小伙伴都撸货撸到手发软，发财发到腿抽筋。一瓶几百+，你算算，这能赚多少钱。是不是不想上班的那种，上班一天才两三百，什么时候才能买到房子。 今天带来一个福利。那就是抢购软件，很实用。朋友圈好多都在用这个抢购。内有教程仔细阅读。最后祝每个伙伴都抢到 赚到