Главное их получить. Проблема "многомерная". С отдельным потоком, помоему, не хочет корректно работать эта схема с таймером.
Без отдельного потока работает правильно, но залипает дожидаясь каждого ответа.
Эта схема общается с гуглом, работает правильно, но только если убираю елемент Thread
Add(MainForm,2953706,84,238)
{
Width=696
Height=389
link(onCreate,9862538:doStart,[])
}
Add(If_else,5642440,413,308)
{
Op2=Integer(0)
link(onTrue,5943869:doCompare,[])
link(Op1,13330092:Active,[])
}
Add(Timer,14362227,343,308)
{
Interval=5000
link(onTimer,7634249:doEvent1,[])
}
Add(Message,15996577,532,308)
{
}
Add(Hub,12827021,497,308)
{
OutCount=3
link(onEvent1,15996577:doMessage,[])
link(onEvent2,9892066:doEvent2,[(523,321)(523,356)(334,356)(334,265)])
link(onEvent3,3474351:doIPByHost,[(517,328)(517,412)(280,412)(280,139)])
}
Add(If_else,5943869,455,308)
{
Type=1
Op2=Integer(5)
link(onTrue,12827021:doEvent1,[])
link(Op1,2331987:Count,[(461,288)(496,288)])
}
Add(Thread,9862538,147,252)
{
link(onExec,9892066:doEvent1,[])
}
Add(Hub,9892066,371,252)
{
InCount=2
link(onEvent1,13330092:doOpen,[])
link(onEvent2,13330092:doSend,[(399,265)(399,272)])
}
Add(TCP_Client,13330092,413,252)
{
Port=80
IP="74.125.87.147"
Point(onError)
link(onRead,2331987:doAdd,[(471,258)(471,230)])
link(IP,12256894:Text,[(419,174)(356,174)])
link(Data,7974905:Text,[(426,236)(440,236)])
}
Add(Memo,2331987,483,224)
{
Left=35
Top=15
Width=610
Height=290
}
Add(StrList,7974905,434,175)
{
Strings=#23:GET index.html HTTP/1.1|16:Host: google.com|17:Connection: close|47:Content-Type: application/x-www-form-urlencoded|62:User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)|18:Content-Length: 32|0:|32:domain=google%2Ecom&imageField2=|
}
Add(Label,14730013,441,371)
{
Left=40
Top=320
}
Add(Hub,7634249,385,308)
{
link(onEvent1,5642440:doCompare,[])
link(onEvent2,3870393:doNext,[(403,321)(403,335)(383,335)(383,377)])
}
Add(Counter,3870393,392,371)
{
link(onNext,14730013:doText,[])
}
Add(Host,3474351,294,126)
{
link(onIPByHost,12256894:doText,[(338,139)(338,132)])
link(HostName,4854686:Text,[])
}
Add(Edit,4854686,301,70)
{
Left=570
Top=320
Width=90
Text="google.com"
}
Add(Edit,12256894,350,126)
{
Left=410
Top=320
Width=150
}



Поиск
Друзья
Администрация