Вверх ↑
Этот топик читают: Гость
Ответов: 5446
Рейтинг: 323
#1: 2005-04-02 15:50:04 ЛС | профиль | цитата
Как-то странно ведёт себя субж - выдаёт onDisconnect, а затем вдруг onRecieve, причём в 137м так было только иногда (при большОй загрузке сети), а в 139й - постоянно. Пример могу привести,
только вот вряд ли он у Вас заработает --- это интерфейс для поискового сервера lorien, стоящего в лок. сети ГЗ МГУ...
карма: 1

0
vip
#1.1контекстная реклама от партнеров
Администрация
Ответов: 15294
Рейтинг: 1518
#2: 2005-04-02 21:34:39 ЛС | профиль | цитата
TCPClient из 137 это совсем другой компонент. Если в 139 имеются глюки то можно его просто переписать из 137.
карма: 26
0
Ответов: 5446
Рейтинг: 323
#3: 2005-04-05 18:08:38 ЛС | профиль | цитата
Похоже, что имеются, причём серьёзные (на уровне реализации).

Путём длительной отладки выяснил, что если TCPClient-у (в 139) приходит пакет после рассоединения то возникает Exception весьма некрасивого вида:
http://iarspider.narod.ru/Clipboard01.jpg


Кроме того, установлено, что оба клиента весьма небрежно
относятся к приходящим пакетам
hiAsm b137
[code:1] Packet: From 172.16.16.100
To 10.0.1.48 Prot: TCP Size: 48 TTL:62
Packet: From 172.16.16.100
To 10.0.1.48 Prot: TCP Size: 40 TTL:62
Packet: From 172.16.16.100
To 10.0.1.48 Prot: TCP Size: 1500 TTL:62
Packet: From 172.16.16.100
To 10.0.1.48 Prot: TCP Size: 1500 TTL:62
Packet: From 172.16.16.100
To 10.0.1.48 Prot: TCP Size: 1500 TTL:62
Packet: From 172.16.16.100
To 10.0.1.48 Prot: TCP Size: 1500 TTL:62
Packet: From 172.16.16.100
To 10.0.1.48 Prot: TCP Size: 1500 TTL:62
Packet: From 172.16.16.100
To 10.0.1.48 Prot: TCP Size: 1500 TTL:62
Packet: From 172.16.16.100
To 10.0.1.48 Prot: TCP Size: 1500 TTL:62
[/code:1]

C# (делает всё то же самое)
[code:1] Packet: From 172.16.16.100
To 10.0.1.48 Prot: TCP Size: 48 TTL:62
Packet: From 172.16.16.100
To 10.0.1.48 Prot: TCP Size: 40 TTL:62
Packet: From 172.16.16.100
To 10.0.1.48 Prot: TCP Size: 1500 TTL:62
Packet: From 172.16.16.100
To 10.0.1.48 Prot: TCP Size: 1500 TTL:62
Packet: From 172.16.16.100
To 10.0.1.48 Prot: TCP Size: 1500 TTL:62
Packet: From 172.16.16.100
To 10.0.1.48 Prot: TCP Size: 1500 TTL:62
Packet: From 172.16.16.100
To 10.0.1.48 Prot: TCP Size: 1500 TTL:62
Packet: From 172.16.16.100
To 10.0.1.48 Prot: TCP Size: 1500 TTL:62
Packet: From 172.16.16.100
To 10.0.1.48 Prot: TCP Size: 1500 TTL:62
(>>) Packet: From 172.16.16.100
(>>) To 10.0.1.48 Prot: TCP Size: 40 TTL:62
[/code:1]
Куда теряется пакет отмеченный (>>)?
карма: 1

0
Администрация
Ответов: 15294
Рейтинг: 1518
#4: 2005-04-05 23:06:57 ЛС | профиль | цитата
iarspider, TCP компонеты версии 139 не моего авторства - полагал что они отлажены и сделаны не на скорую рука. Как оказалось это не так. Пакеты действительно уходят неизвестно куда с полным вылетом программы(это можно увидеть на примере SendPicture). Поэтому придется брать за основу TCP из 137 и делать свои классы по человечески.
карма: 26
0
Ответов: 5446
Рейтинг: 323
#5: 2005-04-06 09:14:29 ЛС | профиль | цитата
Будем ждать... ... ... ...
карма: 1

0
Гость
Ответов: 17029
Рейтинг: 0
#6: 2005-04-14 11:33:42 правка | ЛС | профиль | цитата


Редактировалось 6 раз(а), последний 2021-06-24 08:51:27
карма: 0

0
Администрация
Ответов: 15294
Рейтинг: 1518
#7: 2005-04-14 17:21:59 ЛС | профиль | цитата
biber, ping localhost всегда выдает ttl=255 на любой ОС. Вам это что нибудь говорит?
карма: 26
0
Ответов: 5446
Рейтинг: 323
#8: 2005-04-15 12:11:51 ЛС | профиль | цитата
Когда же наконец появится правильный TCPClient?
А то получается, что hiAsm в моей проге используется только для написания фейса и передачи управления написанным на C++
библиотекам...
карма: 1

0
Ответов: 21
Рейтинг: 1
#9: 2013-09-07 04:51:19 ЛС | профиль | цитата
iarspider писал(а):
Когда же наконец появится правильный TCPClient?

прошло почти 8 лет..., а tcpclient все так же глючит и недокачивает данные. что прекрасно видно из схемы
Add(MainForm,8751972,595,245)
{
Left=20
Top=105
Width=985
Height=774
}
Add(Memo,4645631,609,392)
{
Left=10
Top=35
Width=955
Height=670
ScrollBars=3
Point(onDblClick)
link(onDblClick,4645631:doClear,[(655,405)(655,378)(597,378)(597,405)])
}
Add(TCP_Client,4983970,469,392)
{
Port=80
Point(onError)
link(onRead,490467:doCharset,[])
link(onConnect,16554731:doOn,[(517,405)(517,503)])
link(onDisconnect,16554731:doOff,[(517,412)(517,496)])
link(IP,14063209:Value,[])
}
Add(Hub,10421683,392,385)
{
OutCount=4
link(onEvent1,8336815:doIPByHost,[(413,391)(413,356)])
link(onEvent2,4983970:doClose,[(430,398)(430,405)])
link(onEvent3,4983970:doOpen,[(438,405)(438,398)])
link(onEvent4,4983970:doSend,[])
}
Add(Host,8336815,420,343)
{
link(onIPByHost,14063209:doValue,[])
link(HostName,6133418:Var2,[(433,317)(440,317)])
}
Add(Memory,14063209,469,350)
{
}
Add(LED,16554731,546,483)
{
Left=885
Top=5
ColorOn=65535
}
Add(Button,11403065,294,385)
{
Left=40
Top=10
link(onClick,3311150:doString,[])
}
Add(Edit,2841045,434,259)
{
Left=115
Top=10
Width=255
Text="wlife.spb.ru"
Alignment=2
}
Add(FormatStr,3311150,343,385)
{
Mask="GET /rss.php HTTP/1.1
User-Agent: wl
Host: %1
Accept: text/html, application/xml;q=0.9, application/xhtml+xml, image/png, image/webp, image/jpeg, image/gif, image/x-xbitmap, */*;q=0.1
Accept-Language: ru-RU,ru;q=0.8,en-US;q=0.5,en;q=0.3
Connection: Keep-Alive

"
link(onFString,10421683:doEvent1,[])
link(Str1,6133418:Var1,[(349,306)])
}
Add(GetDataEx,6133418,434,301)
{
link(Data,2841045:Text,[])
}
Add(Charset,490467,539,392)
{
Type=7
link(onCharset,4645631:doAdd,[])
}


страницу недокачевает. собственно может у кого то есть inline tcpclient-а?
карма: 1

0
Гость
Ответов: 17029
Рейтинг: 0
#10: 2013-09-07 09:51:02 правка | ЛС | профиль | цитата


Редактировалось 6 раз(а), последний 2021-06-24 08:51:25
карма: 0

0
Ответов: 21
Рейтинг: 1
#11: 2013-09-07 18:04:27 ЛС | профиль | цитата
я бы и рад но:
1 это как то неправельно. из-за одного компонента менять платформу
2 в снет нет очень много нужных компонентов
3 а что если у меня вообще неустановлен снет.
так что снет это не выход.
зы а ниуког случаем незаволялся тцпклиент из 137 версии?
карма: 1

0
Ответов: 1061
Рейтинг: 22
#12: 2013-09-07 18:26:12 ЛС | профиль | цитата
foxss, а что сам не сделаешь? Сокеты в Delphi
карма: 0

0
Ответов: 4622
Рейтинг: 746
#13: 2013-09-07 21:30:48 ЛС | профиль | цитата
По чем можно заметить, что страница не грузится?
Закрывающий тег получен:


карма: 26

0
файлы: 1sdfsdfsdfsdfsdf.jpg [158.3KB] [528]
Ответов: 1061
Рейтинг: 22
#14: 2013-09-07 22:24:38 ЛС | профиль | цитата
foxss, и правда, что именно не докачивает? У меня как и у Netspirit работает и всё докачивает! Мне кажется, то о чём ты говоришь, проблемы конвертации! Вот у меня куски текста:
в браузере исходник страницы - <![CDATA[Красота • Re: Израильская косметика Lamerel - знакомы?]]>
в программе - <![CDATA[Красота • Re: Израильская косметик
c91
Lamerel - знакомы?]]>

Именно так, с переносами и вместо "ка" - "c91"
карма: 0

0
Ответов: 21
Рейтинг: 1
#15: 2013-09-10 05:48:40 ЛС | профиль | цитата
Netspirit писал(а):
с той лиш разницей, что последним закрывающим тегом должен быть </xml>. Структура xml как бы на это намекает.
RinniX писал(а):
это я заметил сразу и поставил парсер.
карма: 1

0
Сообщение
...
Прикрепленные файлы
(файлы не залиты)