Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Работа с сетью в Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 12.10.2009, 20:35   #11
Пепел Феникса
Старожил
 
Аватар для Пепел Феникса
 
Регистрация: 28.01.2009
Сообщений: 21,000
По умолчанию

кстати ТС а сайт то из инета доступен?
может IP то не прямой всетаки?
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел.
Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.
Пепел Феникса вне форума Ответить с цитированием
Старый 13.10.2009, 13:50   #12
kakawkin
Форумчанин
 
Регистрация: 21.09.2009
Сообщений: 431
По умолчанию

сайт доступен всё из интернета. Спец создавал КС в нете - подрубались, в варике тож подрубаются.

Вот по локалке - подрубаются в чат а через инет - нифика(((
kakawkin вне форума Ответить с цитированием
Старый 13.10.2009, 13:51   #13
kakawkin
Форумчанин
 
Регистрация: 21.09.2009
Сообщений: 431
По умолчанию

Цитата:
Сообщение от SERG1980 Посмотреть сообщение
Проверил у себя всё работает может у вашего друга этот порт уже занят. Вообще рекомендуют порт использовать более 1000.
можно эту строку
Код:
if s[1]+s[2]+s[3]+s[4]='/dis'
записать по другому
Код:
if Pos('dis',s)>0 then...
Код:
 ClientSocket1.Address := Edit1.Text; {Адрес сервера}
  ClientSocket1.Host := edit1.Text;
  ClientSocket1.Port := StrToInt(Edit3.text); {Порт сервера}
за пердложение сменить порт +1

ну а на счёт изменения кода - сначало надо зделать всё чтоыб клиент присоеденился ко мне а потмо уже отсоеденение зделать по лудшему
kakawkin вне форума Ответить с цитированием
Старый 13.10.2009, 14:38   #14
russian-stalker
Участник клубаДжуниор
 
Аватар для russian-stalker
 
Регистрация: 23.08.2008
Сообщений: 1,616
По умолчанию

Может БрандМаэур или Фаервол блокирует подключение? Ой как они не любят, когда к компьютеру пытаются подключится. Или возможно у вас модем настроен роутером и тогда нужно пробрасывать порт..
pushl $0x18E3DF6B
call ICQ
russian-stalker вне форума Ответить с цитированием
Старый 18.10.2009, 18:55   #15
mar4elo
Форумчанин
 
Регистрация: 17.04.2008
Сообщений: 146
По умолчанию

Сам пишу чат (закрученый... типо с регистрацией и тд).. проверил твой, там все ок... кроме момента рассоединения.
У тебя клиент отсылает команду рассоединения в момент закрытия формы!!!!! А если у тебя провайдер отключит сеть????? Сервер неполучит никакой команды!!!.... Остальные участники чата будут думать что ты online.
mar4elo вне форума Ответить с цитированием
Старый 18.10.2009, 18:55   #16
mar4elo
Форумчанин
 
Регистрация: 17.04.2008
Сообщений: 146
По умолчанию

Для этого надо пинговать каждого клиента.
mar4elo вне форума Ответить с цитированием
Старый 21.10.2009, 00:58   #17
betirsolt
Форумчанин
 
Регистрация: 20.07.2009
Сообщений: 421
По умолчанию

Ребята у меня примерно такая же проблема...порт я использую 1500...IP пишу свой и запускаю у себя сервет..и вроде все работает....но когда я скидываю его кому нибудь кто живет за пределами нашего города или в другой стране вот тогда он пишет что сервет не найден....как тут быть???
Уважаемые модераторы, Я всячески стараюсь не нарушать правила сайта, будьте снисходительны
betirsolt вне форума Ответить с цитированием
Старый 21.10.2009, 09:47   #18
mar4elo
Форумчанин
 
Регистрация: 17.04.2008
Сообщений: 146
По умолчанию

а ты уверен что твой провайдер дает IP реальный.... у меня в сети у всех абонентов один внешний IP, и разные внутренние.
mar4elo вне форума Ответить с цитированием
Старый 21.10.2009, 11:59   #19
betirsolt
Форумчанин
 
Регистрация: 20.07.2009
Сообщений: 421
По умолчанию

Цитата:
Сообщение от mar4elo Посмотреть сообщение
а ты уверен что твой провайдер дает IP реальный.... у меня в сети у всех абонентов один внешний IP, и разные внутренние.
не уверен..у нас в городе один провайдер(оптоволокно)и почти весь город подключен..и мой чат кажеться работает только в этой сети..хотя это не локалка...а как тут быть??
Уважаемые модераторы, Я всячески стараюсь не нарушать правила сайта, будьте снисходительны
betirsolt вне форума Ответить с цитированием
Старый 21.10.2009, 13:06   #20
Пепел Феникса
Старожил
 
Аватар для Пепел Феникса
 
Регистрация: 28.01.2009
Сообщений: 21,000
По умолчанию

нужен или портфорвандинг для роутера настраивать(если позволят)
или покупать прямой IP
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел.
Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.
Пепел Феникса вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Неработает программа I_Love_Nike Софт 8 24.09.2009 20:20
Неработает вывод инфы HellMercenariess PHP 11 05.08.2009 18:48