Delphi 7 利用自定义消息实现内部进程通讯的例子

内容索引:Delphi源码,系统相关,自定义消息,进程　　主控程序采用FindWindow()函数找寻底层工作程序，从而实现通讯。底层工作程序在调试时请先生成可执行文件，然后关闭Delphi编辑器，运行可执行文件进行调试。如果不关闭Delphi编辑器，底层工作程序窗口在处于 最小化时将无法正常工作，因为FindWindow()返回的是Delphi编辑器中该窗口的句柄。源代码在Windows XP环境下用Delphi7.0编译调试通过。