delphi - 如何从服务应用程序使用 FindWindow()？

Question

我需要将服务应用程序与 vcl 应用程序进行通信。我的旧应用程序是一个控制台，控制台与 vcl 应用程序通信没有问题。现在我将控制台应用程序迁移到 srv 应用程序。旧的通信使用 FindWindow 和 SendMessage。

我知道我可以使用套接字或命名管道在它们之间进行通信，但是，我现在不想更改结构，因为它会延迟迁移。

有人知道我如何“修复”它吗？

谢谢

Answer 1

FindWindow 无法通过 Vista 或 Win7 中的服务运行，因为服务与用户应用程序运行在不同的桌面中； SendMessage 也不会，因为你无法获取窗口句柄。这意味着如果您要支持这些版本的操作系统，则必须在它们之间使用不同的通信方式。