[Klassenas]

В принципе, прога готова.
Сразу хочу предупредить, что использовал компоненты, не входящие в стандартную комплектацию Delphi: компонент TPing из библиотеки компонентов Internet Component Suite v7, а также TCoolTrayIcon.