一个例子:
请搜索“运行时“,可以找到一个关于“运行时打开文件“的贴子。
或者在我的主页的那个Delphi技巧包裹里面有讨论。
Http://kingron.myetang.com

解决方案 »

  1.   

    不会吧,难道你学delphi就只学了pascal吗?
    delphi处理消息只要你动动小指头就可以了,
    在接收应用程序中写procedure mymsg(var msg:Tmsg);message   WM_YOURMESSAGE;然后
    请点鼠标右健,选 完成class,你的接收函数实现部分就已经在最下放了,如果你一定要自己写
    就:procedure TForm1.mymsg(var msg:Tmsg);
    begin
    if msg.message=WM_YOURMESSAGE then 
          do('what your wants');(example:send  CIH to japanese.pc) 
    end;
    在发送程序中写sendmessage(yourhandle,WM_YOURMESSAGE,0,0);
    这样就ok了