[Daxter]

try
ClientSocket.Active := true;
except
ShowMessagePos('Не удалось соедениться с сервером',100,100);
end;