如何实现当有新邮件时主界面及时提醒??----------------在线等!

如何实现当有新邮件时主界面及时提醒??----------------在线等! Delphi / Windows SDK/API
http://www.delphi2007.net/DelphiBase/html/delphi_20061204162033297.html
当用户A给用户B发送邮件后,用户B的主界面上进行及时提醒??不用time控件间隔从数据库中提取记录.  
  请帮帮小弟吧.

用indy的控件...   看demo