Delphi＋SQL C/S程序，如何给在线用户发消息？

Question

公司一套用Delphi和SQL做的程序，现想实现一个功能：
　　通过系统管理的程序，给其它所有模块或分模块的在线用户发消息，提示一些更改问题。各分模块操作员同时可以给系统管理员发问题请教。类似于一个挂在程序中的聊天程序。
　　最好客户端显示消息发式，类似于杀毒软件式的从屏幕右下角弹出。
　　如何实现？请赐教。

Answer 1

如果不想写成一个聊天工具，就在数据库中建立一个消息表，然后每个客户端定时查询这个数据表中是否存在发给自己的消息，如果存在就弹出消息提示。原理类似CSDN中的短消息提醒机制。
至于弹出消息提示的方式，可以去www.2ccc.com下载一个类似MSN弹出窗体的控件，用法也很简单。

Answer 2

基于数据库只有采用拖曳的方式；就是主动去请求；基于socket则灵活多了；程序里建立一个监听，负责接收消息即可。