[PhoeniX]

1.
*Оммм... получаю исходник телекинезом...*
Проблема в строчке 59!
2.
Периодический вызов Application.ProcessMessages?
3.
Пингуй гугл
Примеров пинга в инэте миллионы, пользуйся да хоть тем же гуглом