iarspider, накопитель лучше делать так, причем, для всех типов StrCat
Add(MainForm,7359039,252,196) { Width=782 Height=643 Color=-16777199 Visible=1 Position=1 Point(doVisible) } Add(ChildForm,7728605,154,252) { link(onEvent1,12058606:doStrCatDlm,[]) link(onEvent2,7359039:doVisible,[(219,265)(219,230)]) } BEGIN_SDK Add(EditMulti,4561655,7,0) { EventCount=2 Width=384 Height=186 } Add(MainForm,8768090,133,7) { Left=35 Top=105 Width=333 Height=288 Color=-16777215 Caption="Вход" BorderStyle=4 Position=1 Point(Handle) link(onCreate,13846811:doWork1,[(177,27)(177,48)]) } Add(ChildPanel,13846811,189,42) { link(onEvent1,4561655:onEvent1,[(275,48)(275,6)]) link(onEvent2,3315628:doEvent1,[(243,55)(243,125)]) } BEGIN_SDK Add(EditMulti,16241789,0,14) { EventCount=2 WorkCount=1 Width=692 Height=578 link(doWork1,1923959:doEvent1,[(32,20)(32,111)]) } Add(Panel,11306209,28,203) { Left=15 Top=15 Width=294 Height=222 Color=-16777204 } Add(Label,15106091,323,28) { Left=80 Top=10 Width=102 Height=20 Color=-16777204 Font=[MS Sans Serif,10,1,0,1] Caption="Авторизация" Point(doColor) Point(doFont) } Add(ButtonRush,8735660,91,364) { Left=65 Top=190 Width=105 Color=-16777204 Caption="Авторизоватся" Glyphs=[] link(onClick,6757488:doEvent1,[]) } Add(Label,16226155,329,28) { Left=10 Top=40 Color=-16777204 Font=[MS Sans Serif,8,1,0,1] Caption="Логин:" Point(doColor) Point(doFont) } Add(Label,14182436,336,28) { Left=10 Top=65 Color=-16777204 Font=[MS Sans Serif,8,1,0,1] Caption="Пароль:" Point(doColor) Point(doFont) } Add(Edit,3091277,196,119) { Left=65 Top=65 Width=165 Text="qweasd" Password=0 } Add(Edit,69489,147,119) { Left=65 Top=40 Width=165 Text="bacek" } Add(Label,5595751,329,378) { Left=85 Top=240 Width=4 Height=4 Color=-16777204 Font=[MS Sans Serif,8,1,255,1] Caption="" Point(doVisible) } Add(Informer,7836465,161,378) { Data="Please wait..." link(onContinue,1024061:doTimer,[]) link(onInfo,12065988:doWork2,[(216,391)(216,418)]) } Add(Informer,13333519,266,378) { Data="OK" link(onInfo,12065988:doWork1,[(305,391)]) } Add(HubEx,12065988,301,412) { link(onEvent,5595751:doText,[(318,418)(318,384)]) } Add(Timer,1024061,224,378) { Interval=4000 Enable=1 AutoStop=1 link(onTimer,13333519:doInfo,[]) } Add(Hub,6757488,133,364) { link(onEvent1,7836465:doInfo,[(154,370)(154,384)]) link(onEvent2,14147925:doBuild,[(172,377)(172,216)]) } Add(HTTP_PostBuilder,9072098,203,252) { URL="/login.php" Host="torrentm.ru" UserAgent="Mozilla/5.0 (Windows; U; Windows NT 5.1; ru; rv:1.9.2) Gecko/20100115 MRA 5.6 (build 03278) Firefox/3.6" Point(Session) link(onBuild,8204047:doEvent1,[]) } Add(URLBuilder,14147925,189,210) { Args=#8:username|8:password|11:imagestring|9:imagehash|0:| link(onBuild,10970233:doBuild,[(265,216)(265,307)]) link(username,69489:Text,[(195,184)(153,184)]) link(password,3091277:Text,[]) link(imagestring,9666976:Text,[(209,184)(272,184)]) link(imagehash,6677405:Value,[(216,156)(251,156)]) } Add(Flash,9509344,350,70) { Left=60 Top=95 Width=170 Height=55 Color=-16777199 } Add(Label,4807018,343,28) { Left=5 Top=160 Width=133 Height=17 Color=-16777204 Font=[MS Sans Serif,8,1,0,1] Caption="Код подтверждения:" } Add(BlockFind,11877194,175,70) { IncludeBlock=1 StartBlock="name="imagehash" value="" EndBlock=""" link(onSearch,6677405:doValue,[]) } Add(Hub,8204047,245,252) { link(onEvent1,15429759:doOpen,[]) link(onEvent2,15429759:doSend,[(269,265)(269,272)]) } Add(TCP_Client,15429759,280,252) { Port=80 IP="212.15.130.122" link(onRead,8392064:doSearch,[]) } Add(HTTP_Get,3284981,77,63) { URL="http://torrentm.ru/login.php" link(onDownload,825475:doConvert,[]) } Add(Convertor,825475,126,70) { Mode=11 link(onResult,11877194:doSearch,[]) } Add(Memory,6677405,245,70) { link(onData,11037062:doStrCat,[]) } Add(StrCat,11037062,294,70) { Str1="http://torrentm.ru/captcha.php?imagehash=" link(onStrCat,9509344:doPlay,[]) } Add(Edit,9666976,266,119) { Left=135 Top=155 Width=95 Text="" } Add(BlockFind,8392064,322,252) { IncludeBlock=1 StartBlock="PHPSESSID=" EndBlock="; path=/" link(onSearch,9618299:doValue,[]) } Add(HTTP_PostBuilder,10970233,350,301) { URL="/takelogin.php" Host="torrentm.ru" Point(Session) link(onBuild,6063626:doEvent1,[]) link(Session,9618299:Value,[]) } Add(Memory,9618299,371,252) { } Add(Hub,1923959,49,105) { link(onEvent1,3284981:doDownload,[(70,111)(70,69)]) link(onEvent2,9072098:doBuild,[(133,118)(133,258)]) } Add(TCP_Client,7821146,427,301) { Port=80 IP="212.15.130.122" link(onRead,16689354:doAdd,[(485,307)(485,272)]) link(onDisconnect,15203432:doEnum,[(478,321)(478,335)]) } Add(Hub,6063626,399,301) { link(onEvent1,7821146:doOpen,[]) link(onEvent2,7821146:doSend,[(420,314)(420,321)]) } Add(BlockFind,6687279,560,329) { IncludeBlock=1 StartBlock="Set-Cookie: " EndBlock=";" link(onSearch,16241789:onEvent1,[(611,335)(611,20)]) } Add(ArrayEnum,15203432,497,329) { link(onItem,6687279:doSearch,[]) link(onEndEnum,16241789:onEvent2,[(611,342)(611,27)]) link(Array,16689354:Array,[(503,320)(531,320)]) } Add(StrList,16689354,511,266) { } END_SDK Add(Hub,3315628,266,119) { link(onEvent1,8768090:doClose,[(293,125)(293,95)(121,95)(121,34)]) link(onEvent2,4561655:onEvent2,[(336,132)(336,13)]) } END_SDK Add(TCP_Client,7821146,343,329) { Port=80 IP="212.15.130.122" link(onRead,13454143:doAdd,[]) link(onDisconnect,2132649:doSearch,[(391,349)(391,398)]) } Add(Hub,6063626,308,329) { link(onEvent1,7821146:doOpen,[]) link(onEvent2,7821146:doSend,[(329,342)(329,349)]) } Add(Button,8042383,154,329) { Left=25 Top=220 link(onClick,3365555:doString,[]) } Add(Edit,2056879,308,252) { Left=235 Top=90 Width=320 } Add(WebBrowser,374273,490,364) { Left=110 Top=120 Width=570 Height=435 Silent=0 Point(doFromText) } Add(BlockFind,2132649,420,392) { StartBlock="<!DOCTYPE" EndBlock="</body></html>" link(onSearch,374273:doFromText,[]) link(Text,13454143:Text,[]) } Add(StrList,13454143,420,329) { } Add(FormatStr,3365555,252,329) { DataCount=1 Mask="GET /index.php HTTP/1.1 Host: torrentm.ru Cookie: %1 Connection: close
" link(onFString,6063626:doEvent1,[]) link(Str1,16772431:Var2,[]) } Add(StrCatDelim,12058606,252,252) { Delimiter="; " link(onStrCatDlm,2056879:doText,[]) link(Str1,16772431:Var1,[(258,240)(246,240)(246,296)]) } Add(GetDataEx,16772431,252,291) { link(Data,12058606:Result,[]) }
|