TClientSocket и TServerSocket
 

В данный момент разбираюсь с сокетами. Написал слиент который подключается к серверу и отсылает сообщения.
На моём компьютере всё работает. Но если я отправляю кому-то сервер я подключится не могу почему-то. В чём может быть проблема?
Ещё один вопрос. Как можно подключиться к серверу который запущен на компьютере за роутером?

1. Открыть необходимые порты
2. Необходимо, чтобы компьютер был "виден" из свой сети(по имени или IP).
У меня есть программы, которые ищут ключ, который находится в другом городе (канал - Оптика, количество маршрутизаторов и проксей промежуточных - около 9. Машины в разных доменах и подсетях) - и все работает.

Что за программы? Сам писал или их можно где-то достать?