怎么写监控程序

我想在一台机器上运行一个监控程序，等待其他机器的通讯连接，连接成功后能互传一些信息。
请问：这个监控程序要怎么写，要用什么控件，能不能提供些思路呀！
这个监控程序是不是要一直去循环，看看有没有连接的呀？还是，当一台机器连的时候，去启动那个监控的程序呢？
哪里有没有 delphi写的通讯方面的源码呀！