Delphi Многопользовательский чат

Доброго времени суток. Возник такой вопрос. Я создал чат для публичного использования, то есть для многих людей, но проблема получается в том что я могу присоединиться только сам к себе в многооконку. Когда пытаются друзья подключиться, то ничего не происходит а просто выдает ошибку. пробовал подключаться к внутреннему и внешнему IP результат один, я могу к себе приконнектится ко мне не могут. вот готовый код программы
http://www.delphi.int.ru/code/c3c6ab21