delphi进程间通讯例子,自定义消息传递或共享内存区,多个程序共享内存