Вверх ↑
Ответов: 294
Рейтинг: 64
#1: 2010-04-15 03:15:18 ЛС | профиль | цитата
mmmmm писал(а):
Изображение из TCP_Client из точки onRead

Копать примерно в таком направлении, только вот "режет" картинку... наверное спотыкается о нечитабельные символы.

Add(MainForm,9089047,63,112)
{
Width=289
Height=178
Position=1
}
Add(Button,5900693,63,175)
{
Left=5
Top=5
Caption="1"
link(onClick,11213725:doEvent1,[])
}
Add(TCP_Client,621424,133,175)
{
Port=80
IP="212.26.141.102"
link(onRead,10640218:doEvent1,[])
link(Data,4326318:Text,[])
}
Add(Hub,11213725,105,175)
{
link(onEvent1,621424:doOpen,[])
link(onEvent2,621424:doSend,[(126,188)(126,195)])
}
Add(StrList,4326318,140,112)
{
Strings=#27:GET /passport/reg/ HTTP/1.1|74:User-Agent: Opera/9.80 (Windows NT 5.1; U; ru) Presto/2.2.15 Version/10.01|19:Host: www.e-mail.ua|17:Accept: text/html|30:Referer: http://www.e-mail.ua/|21:Cookie: euagusi=; b=b|0:|0:|
}
Add(Edit,2585630,336,217)
{
Left=65
Top=5
Width=200
Text=""
}
Add(BlockFind,8875233,294,217)
{
IncludeBlock=1
StartBlock="Set-Cookie: cchc="
EndBlock=";"
link(onSearch,2585630:doText,[])
}
Add(Button,6686716,210,301)
{
Left=5
Top=25
Caption="2"
link(onClick,13195805:doString,[])
}
Add(Hub,10640218,175,175)
{
link(onEvent1,9541570:doSearch,[])
link(onEvent2,8875233:doSearch,[(209,188)(209,223)])
}
Add(BlockFind,9541570,217,175)
{
IncludeBlock=1
StartBlock="checkidx="
EndBlock="""
link(onSearch,11300063:doText,[])
}
Add(Edit,11300063,259,175)
{
Left=65
Top=25
Width=200
Text=""
}
Add(TCP_Client,12643149,343,301)
{
Port=80
IP="212.26.141.102"
link(onRead,5055782:doCopy,[])
}
Add(Hub,2737560,301,301)
{
link(onEvent1,12643149:doOpen,[])
link(onEvent2,12643149:doSend,[(326,314)(326,321)])
}
Add(Image,8419652,539,301)
{
Left=85
Top=50
Width=180
Height=80
}
Add(Gif,15477033,490,294)
{
DrawSource=2
link(onDraw,8419652:doLoad,[])
}
Add(FormatStr,13195805,259,301)
{
Mask="GET /passport/code/?checkidx=%1 HTTP/1.1
Host: www.e-mail.ua
Referer: http://www.e-mail.ua/passport/reg/
Cookie: cchc=%2; euagusi=; b=b
Cookie2: $Version=1

"
Point(FString)
link(onFString,2737560:doEvent1,[])
link(Str1,11300063:Text,[])
link(Str2,2585630:Text,[(272,261)(342,261)])
}
Add(Convertor,6203429,441,301)
{
Mode=12
link(onResult,15477033:doLoadFromStream,[])
}
Add(Copy,5055782,392,301)
{
Position=184
Count=50000
link(onCopy,6203429:doConvert,[])
}



карма: 0

1
Голосовали:mmmmm