if(TInterval[0] == 5) Т.е. на пятой секунде коннектимся. А если TInterval[0] == 6 (и больше - серсер не стартовал в течение 5-ти сек.) Может...
У Borland-vcl вроде Application.ShowMainForm:=false;
Имена участников (разделяйте запятой).