摘要:
1、Unit2:unit Unit2; interface
uses windows,classes,NMICMP,SysUtils,StdCtrls,messages;
const WM_MY_PING = WM_USER +1024;
type //要传递的消息记录. TPingMsg = record msg : array[0..1023] of char; id : integer; Handled : boolean; msg2 : string; //建议如果需要动态管理,比如采用List,采用字符数组的方... 阅读全文