Форум на Исходниках.RU

Форум на Исходниках.RU https://forum.sources.ru Форум на Исходниках.RU Форум на Исходниках.RU https://forum.sources.ru/index.php?showtopic=316812&view=findpost&p=3814629 Tue, 12 Nov 2019 11:34:57 +0000 ClientSocket нет события onRead https://forum.sources.ru/index.php?showtopic=316812&view=findpost&p=3814629 VFaust
У вас что то получилось? Интересен результат)]]> STest69 Delphi: Сетевое программирование https://forum.sources.ru/index.php?showtopic=316812&view=findpost&p=2737773 Thu, 28 Oct 2010 07:33:48 +0000 ClientSocket нет события onRead https://forum.sources.ru/index.php?showtopic=316812&view=findpost&p=2737773
CommView видит данные, и я хочу принимать вот такие "специфические" пакеты...

Добавлено 28.10.10, 07:36
На другом форуме мне предложили

Цитата:
Ну для отпетых извращенцев есть еще способ - cотворить файрвол и в интересующих пакетах менять PSH c 0 на 1]]> VFaust Delphi: Сетевое программирование https://forum.sources.ru/index.php?showtopic=316812&view=findpost&p=2736969 Wed, 27 Oct 2010 11:05:32 +0000 ClientSocket нет события onRead https://forum.sources.ru/index.php?showtopic=316812&view=findpost&p=2736969 Цитата VFaust @ 27.10.10, 07:53

Проблема не в отправлении, а в приеме...

Ну в таком случае могу посоветовать поднять серверное приложение и этим клиентом попробовать подконнектиться к нему (например, на локалхост). И убедиться, что то, что посылаешь с сервера на клиенте нормально принимается. Если это будет так, а с девайса не сможешь принимать - тогда только изучать, почему так, углубившись в мануалы по девайсу (если он стороннего производителя)... :D А вот если прием и здесь "захромает", тогда уже и "репу морщить" в сторону нормальности компонента и т.д....]]> medved_68 Delphi: Сетевое программирование https://forum.sources.ru/index.php?showtopic=316812&view=findpost&p=2736731 Wed, 27 Oct 2010 07:53:01 +0000 ClientSocket нет события onRead https://forum.sources.ru/index.php?showtopic=316812&view=findpost&p=2736731
Фото пакета который я отсылаю
user posted image

Фото пакета, который я не могу получить
user posted image

Красным выделены различия, как мне кажется из-за которых я не вижу пакета...
Зеленым выделены данные...]]> VFaust Delphi: Сетевое программирование https://forum.sources.ru/index.php?showtopic=316812&view=findpost&p=2736557 Wed, 27 Oct 2010 04:33:27 +0000 ClientSocket нет события onRead https://forum.sources.ru/index.php?showtopic=316812&view=findpost&p=2736557 Цитата VFaust @ 26.10.10, 19:04

Как только я посылаю 4ю посылку у меня дисконнект...
Судя по логам CommView дисконнект происходит с моей стороны (если такое событие имеет инициатора)...

Показывай, как посылаешь... :D

Добавлено 27.10.10, 04:37

Цитата VFaust @ 26.10.10, 10:21

На кнопку отсылаю ClientSocket1.Socket.SendText(#00);

Как вариант - попробуй воспользоваться методом SendBuf... :huh:]]> medved_68 Delphi: Сетевое программирование https://forum.sources.ru/index.php?showtopic=316812&view=findpost&p=2736456 Tue, 26 Oct 2010 19:04:12 +0000 ClientSocket нет события onRead https://forum.sources.ru/index.php?showtopic=316812&view=findpost&p=2736456 Как только я посылаю 4ю посылку у меня дисконнект...
Судя по логам CommView дисконнект происходит с моей стороны (если такое событие имеет инициатора)...

Добавлено 26.10.10, 19:12
Только что заметил маленький нюанс...
При расшифровке пакета ComView в пакете подсвечивает части [Ethernet II], [IP], [TCP]...
После области TCP я наблюдаю свои данные...!!!!, но в расшифровке эти данные не значатся..., а параметр TCP.Data length = 0...!!!

Добавлено 26.10.10, 19:43
Покопал еще...,

во всех исходящих пакетах
IP -> Flags -> Don't fragment bit: 1 - Don't fragment

а во входящих пакетах
IP -> Flags -> Don't fragment bit: 0 - May fragment]]> VFaust Delphi: Сетевое программирование https://forum.sources.ru/index.php?showtopic=316812&view=findpost&p=2736444 Tue, 26 Oct 2010 18:46:02 +0000 ClientSocket нет события onRead https://forum.sources.ru/index.php?showtopic=316812&view=findpost&p=2736444 Цитата VFaust @ 26.10.10, 17:52

Есть событие onConnect затем onWrite,

Отлично.

Цитата VFaust @ 26.10.10, 17:52

после отправки 4й посылки появляется событие onDisconnect...

Если ВООБЩЕ ничего не посылать - будет дисконнект через определенное время или нет? И это время одинаковое в случае если ты как сейчас посылаешь и когда вообще ничего не посылаешь? :D]]> medved_68 Delphi: Сетевое программирование https://forum.sources.ru/index.php?showtopic=316812&view=findpost&p=2736400 Tue, 26 Oct 2010 17:52:15 +0000 ClientSocket нет события onRead https://forum.sources.ru/index.php?showtopic=316812&view=findpost&p=2736400 VFaust Delphi: Сетевое программирование https://forum.sources.ru/index.php?showtopic=316812&view=findpost&p=2736392 Tue, 26 Oct 2010 17:46:46 +0000 ClientSocket нет события onRead https://forum.sources.ru/index.php?showtopic=316812&view=findpost&p=2736392 Цитата VFaust @ 26.10.10, 10:21

Что не получается:
1. Не происходит события onRead...

После активации сокета (Open или Connect) было событие Connected? (Пакеты пока вообще не посылаем)...:D]]> medved_68 Delphi: Сетевое программирование https://forum.sources.ru/index.php?showtopic=316812&view=findpost&p=2735814 Tue, 26 Oct 2010 10:21:11 +0000 ClientSocket нет события onRead https://forum.sources.ru/index.php?showtopic=316812&view=findpost&p=2735814 1. Контроллер (PLC) c Ethernet его IP=192.168.0.20 (порт для подключения 102);
2. Компьютер (PC) мой IP=192.168.0.12

Что требуется:
1. Подключиться к порту
2. Периодически отсылать посылки байтов

Что делаю:
1. На форму ClientSocket поставил параметры:
Address: 192.168.0.20
ClientType: ctNonBlocking
Port: 102
2. На кнопку отсылаю ClientSocket1.Socket.SendText(#00);
3. Жду событие onRead

Что не получается:
1. Не происходит события onRead...
2. Через несколько посылок Disconnect...

Аргумент:
смотрю пакеты CommView`ом, пакеты видны, как исходящие, так и входящие...

P.S. делал анологичное приложение, всё работает, но там был другой порт и PLC...]]> VFaust Delphi: Сетевое программирование