发信人: soaringbird(DownwithJapan) 
整理人: teleme(2001-07-30 17:42:37), 站内信件
 | 
 
 
【 在 sysbase 的大作中提到:】
 :...
 : procedure MyMessage(var msg: TMessage); message WM_USER;
 :.....
 :procedure TForm1.MyMessage(var msg: TMessage);
 :begin
 :
 :......
  ShowMessage(PChar(msg.LParam));
 
  ---- 我强烈地憎恨所有的日本鬼子,我强烈地厌恶所有的哈日族分子!
 打倒日本帝国主义!  | 
 
 
 |