如何将短字符串从 Visual Basic 应用程序发送到 Delphi 应用程序？

Question

我需要从一个 VB 应用程序向 Delphi 应用程序发送一个短字符串（小于 30 个字节，但每秒发送一次）。在 Windows 中使用 CopyDataStruct、WM_COPYDATA 和 SendMessage 函数可以吗？

Answer 1

我想说 WM_COPYDATA 是执行此操作的完美方法。例如，您只需要获取 Delphi 主窗体即可实现 WM_COPYDATA 的消息处理程序。

在 Delphi 端，它看起来像这样：

TMyMainForm = class(TForm)
protected
  procedure WMCopyData(var Msg: TWMCopyData); message WM_COPYDATA;
end;

procedure TMyMainForm.WMCopyData(var Msg: TWMCopyData);
begin
  //do something with Msg.lpData
end;

您的 VB 代码将需要获取 Delphi 主窗体的窗口句柄。

Answer 2

这听起来像是使用 DDE 来完成的事情。另一种方法是将字符串写入注册表中的临时区域，然后调用其他程序来读取它，并在完成后删除临时注册表项。您还可以在命令行中将字符串作为参数传递，然后执行程序。