如何发送消息（来者有分）

Question

在一个局域网里如何给一个已知 的地址发送信息。
要求：
   对方能把收到的信息弹出来，（不要搞c/s模型，
这个我会。）
也就是windows里的winpop 程序，但是它的速度太慢了。
有资料也可以，有源码更好
[email protected]

Answer 1

直接用window 的command的netsend,再delphi裡面寫好命令,直接執行就可以了
Net send
將訊息傳送到網路上的其他使用者、電腦或訊息傳送名稱。須執行 Messenger 服務，才能接收訊息。net send {name | * | /domain[:name] | /users} message 參數 name指定使用者名稱、電腦名稱或要接收訊息的名稱。如果是含空白字元的電腦名稱，請用引號 (" ") 括住別名。當成 NetBIOS 名稱時，長使用者名稱可能會發生問題。 NetBIOS 名稱的長度是限制為 16 個字元，而 Windows 2000 保留第十六個字元。 *將訊息傳送給網域或工作群組中的所有名稱。 /domain[:name]將訊息傳送給電腦網域中的所有名稱。如果已指定 name，則會將訊息傳送所指定網域或工作群組中的所有名稱。 /users將訊息傳送給與伺服器連線的所有使用者。 message指定當成訊息傳送的文字。 

Answer 2

用net send的话如果对方关闭了消息服务就没法看到了。