Вверх ↑
Ответов: 39
Рейтинг: 0
#1: 2021-02-11 18:44:00 ЛС | профиль | цитата
Понял, попробую ещё реализовать динамическим контейнером

А onerror или при изменении статус кода не прокатит. У меня ошибка передаётся в ответе

Спасибо за подсказки

--- Добавлено в 2021-02-11 19:32:55

Ну не, я уже убрал прерывание потока "насильно", но всеравно программа вырубается через 2+часа

Посмотрите, пожалуйста, может я что-то не так делаю?


Make(delphi)
ver(4.05 build 186)
Add(MainForm,2953706,21,105)
{
Width=527
Height=413
link(onCreate,11422444:doString,[(114,125)(114,97)])
}
Add(Memo,14828705,868,182)
{
Top=50
Width=511
Height=324
Align=5
AddType=1
link(onChange,801416:doLength,[])
}
Add(Button,12132440,350,322)
{
Width=511
Height=50
Align=2
link(onClick,8928539:doShellExec,[(404,328)(404,335)])
}
Add(WinExec,8928539,427,322)
{
}
Add(MultiElement,9318530,343,245)
{
@Color=11163135
link(onEvent1,5289262:doString,[])
link(Data1,12917168:Value,[(349,89)(384,89)])
link(Data2,3254399:Value,[(356,149)(440,149)])
}
BEGIN_SDK
Add(EditMulti,3634868,21,21)
{
EventCount=1
WorkCount=1
DataCount=5
Width=930
Height=781
link(doWork1,12666540:doCompare,[(42,27)(42,538)])
}
Add(MultiElement,15921226,357,476)
{
link(Data1,3634868:Data2,[(363,248)(34,248)])
}
BEGIN_SDK
Add(EditMulti,14911298,21,21)
{
WorkCount=1
DataCount=1
VarCount=3
Width=783
Height=494
link(doWork1,2327038:doSplit,[(53,27)(53,146)])
link(Var1,1160941:Value,[(27,361)(594,361)])
link(Var2,2055145:Value,[(34,361)(671,361)])
link(Var3,10482298:Value,[(41,361)(727,361)])
}
Add(MultiStrPart,2327038,84,140)
{
Char="@"
Point(onNotFound)
link(onSplit,7271578:doEvent1,[(149,146)])
link(Str,15582719:Var2,[])
link(onNotFound,12142469:doEvent1,[(124,153)(124,265)])
}
Add(Memory,1160941,588,175)
{
}
Add(Memory,2055145,665,175)
{
}
Add(Memory,10482298,721,175)
{
}
Add(Hub,12142469,147,259)
{
OutCount=3
link(onEvent1,7517633:doData,[])
link(onEvent2,2055145:doClear,[(392,272)(392,188)])
link(onEvent3,10482298:doClear,[(420,279)(420,188)])
}
Add(DoData,7517633,182,259)
{
link(onEventData,14285636:doEvent1,[(380,265)(380,181)])
link(Data,15582719:Var3,[(188,103)])
}
Add(GetDataEx,15582719,84,98)
{
Angle=3
link(Data,14911298:Data1,[(27,103)])
}
Add(Hub,7271578,147,119)
{
link(onEvent1,12435606:doData,[])
link(onEvent2,12544637:doSplit,[(193,132)(193,167)])
}
Add(DoData,12435606,196,119)
{
link(onEventData,14285636:doEvent2,[(390,125)(390,188)])
link(Data,2327038:Part1,[(202,107)(146,107)(146,184)(90,184)])
}
Add(Hub,14285636,553,175)
{
InCount=2
link(onEvent1,1160941:doValue,[])
}
Add(MultiStrPart,12544637,224,161)
{
Char=":"
Point(onNotFound)
link(onSplit,10835903:doEvent1,[])
link(Str,2327038:Part2,[(230,149)(164,149)(164,184)(97,184)])
}
Add(Hub,10835903,266,161)
{
link(onEvent1,15683516:doData,[(287,167)(287,146)])
link(onEvent2,3122225:doData,[(290,174)(290,188)])
}
Add(DoData,15683516,294,140)
{
link(onEventData,2055145:doValue,[(496,146)(496,181)])
link(Data,12544637:Part1,[(300,128)(265,128)(265,205)(230,205)])
}
Add(DoData,3122225,301,182)
{
link(onEventData,10482298:doValue,[(527,188)(527,181)])
link(Data,12544637:Part2,[(307,170)(272,170)(272,205)(237,205)])
}
END_SDK
Add(HTTPClient,13486350,497,686)
{
Method=1
EncType=1
ConnectTimeout=15000
SendTimeout=0
RecvTimeout=0
Point(Proxy)
Point(ProxyUser)
Point(ProxyPass)
Point(onAuthProxy)
Point(doUserAgent)
Point(PostData)
Point(onStateChange)
Point(doCustomMethod)
link(URL,3634868:Data1,[(503,326)(27,326)])
link(FileName,7399373:Var3,[(510,89)])
link(onFinish,7205917:doEvent1,[])
link(Proxy,15921226:Var1,[(517,569)(363,569)])
link(ProxyUser,15921226:Var2,[(524,569)(370,569)])
link(ProxyPass,15921226:Var3,[(531,569)(377,569)])
link(PostData,6535530:Var2,[])
}
Add(Hub,9914947,294,511)
{
InCount=2
OutCount=9
link(onEvent1,1447053:doWork1,[(476,517)(476,482)])
link(onEvent4,15921226:doWork1,[(332,538)(332,482)])
link(onEvent5,3577732:doCompare,[(354,545)(354,524)])
link(onEvent8,10903385:doStart,[(320,566)(320,594)(275,594)(275,678)])
link(onEvent9,14884823:doTimer,[(224,573)(224,713)])
}
Add(DoData,12209347,483,483)
{
link(onEventData,13486350:doUserAgent,[(522,489)(522,713)])
link(Data,7176825:Value,[(489,457)(552,457)])
}
Add(If_else,3577732,399,518)
{
link(onTrue,12209347:doData,[(457,524)(457,489)])
link(onFalse,13679300:doData,[(457,531)(457,538)])
link(Op1,14767262:Var2,[])
link(Op2,12767415:Value,[(412,496)(433,496)])
}
Add(GetDataEx,14767262,399,427)
{
link(Data,3634868:Data3,[(405,270)(41,270)])
}
Add(DoData,13679300,483,532)
{
link(Data,14767262:Var3,[(489,432)])
}
Add(Memory,12767415,427,441)
{
Default=String()
}
Add(Memory,7176825,546,399)
{
Default=String(Mozilla/5.0 (Windows NT 5.1; rv:52.0) Gecko/20100101 Firefox/52.0)
}
Add(Thread,10903385,315,672)
{
Delay=200
FastStop=0
link(onExec,6565431:doCompare,[])
}
Add(Hub,7205917,623,693)
{
OutCount=4
link(onEvent1,3634868:onEvent1,[(729,699)(729,27)])
link(onEvent2,14884823:doStop,[(649,706)(649,713)(254,713)(254,720)])
link(onEvent3,10386299:doEvent2,[(642,713)(642,580)(590,580)(590,503)])
}
Add(Memory,1032677,686,476)
{
Default=String(1)
}
Add(ChanelToIndex,1447053,644,476)
{
link(onIndex,1032677:doValue,[])
}
Add(If_else,12666540,63,532)
{
link(onTrue,2892296:doCompare,[])
link(Op1,15281892:Var1,[(69,520)])
link(Op2,9146203:Var1,[(76,460)])
}
Add(Memory,3176811,112,357)
{
Default=String(1)
}
Add(Timer,14884823,259,707)
{
Interval=15000
Enable=1
AutoStop=1
link(onTimer,10386299:doEvent1,[(478,713)(478,496)])
}
Add(Hub,10386299,602,490)
{
InCount=2
link(onEvent1,1447053:doWork2,[(630,496)(630,489)])
}
Add(GetDataEx,13492034,504,609)
{
link(Data,3634868:Data4,[(510,326)(48,326)])
}
Add(If_else,2892296,112,532)
{
link(onFalse,9914947:doEvent1,[(219,545)(219,517)])
link(Op1,16153412:Var1,[(118,513)(268,513)(268,716)])
link(Op2,9146203:Var3,[(125,460)])
}
Add(GetDataEx,9146203,112,455)
{
link(Data,3176811:Value,[])
}
Add(If_else,6565431,385,672)
{
link(onTrue,13486350:doLoadString,[(457,678)(457,692)])
link(onFalse,13486350:doLoadFile,[(457,685)(457,699)])
link(Op1,7399373:Var2,[(391,318)(55,318)])
link(Op2,14123805:Value,[])
}
Add(GetDataEx,7399373,49,84)
{
link(Data,3634868:Data5,[])
}
Add(Memory,14123805,392,133)
{
}
Add(GetDataEx,15281892,686,515)
{
link(Data,1032677:Value,[])
}
Add(GetDataEx,16153412,315,711)
{
link(Data,10903385:Busy,[])
}
Add(GetDataEx,6535530,532,647)
{
Angle=3
link(Data,13492034:Var2,[(510,652)])
}
END_SDK
Add(Timer,14462657,133,161)
{
Interval=4000
link(onTimer,6286219:doEvent1,[])
}
Add(Memory,12917168,378,28)
{
Default=String(https://api.vk.com/method/wall.get.xml)
}
Add(Memory,3254399,434,21)
{
Default=String(193.56.188.118:8000@vTH1sM:Cqkp9P)
}
Add(FormatStr,15584895,301,175)
{
Mask="Пробуем отправить запрос..."
link(onFString,15308901:doEvent1,[(439,181)(439,202)])
}
Add(MultiElement,13613827,917,294)
{
link(Data1,5871902:Value,[(923,184)(825,184)])
}
BEGIN_SDK
Add(EditMulti,16152815,21,21)
{
WorkCount=1
DataCount=1
Width=769
Height=508
link(doWork1,16549455:doValue,[(35,27)])
}
Add(FormatStr,6743866,175,217)
{
DataCount=1
Mask="%1.txt"
Point(FString)
link(onFString,13380617:doLoad,[(265,223)(265,237)])
link(Str1,16152815:Data1,[(181,119)(27,119)])
}
Add(Hub,11787960,77,77)
{
OutCount=6
link(onEvent3,6743866:doString,[(133,97)(133,223)])
link(onEvent4,4083985:doString,[(126,104)(126,279)])
link(onEvent5,13380617:doSave,[(207,111)(207,230)])
link(onEvent6,13380617:doClear,[(207,118)(207,202)])
}
Add(GetDataEx,5696236,203,81)
{
}
Add(Time,2036820,224,112)
{
Format="Y_M_D"
}
Add(StrList,13380617,322,189)
{
Point(doAppend)
Point(doAppendText)
Point(doLoad)
Point(doSave)
link(Str,4083985:FString,[(328,177)(248,177)(248,317)(167,317)])
link(FileName,6743866:FString,[(335,177)(258,177)(258,261)(181,261)])
}
Add(FormatStr,4083985,161,273)
{
Mask="%1"
Point(FString)
link(onFString,13380617:doAppendText,[(257,279)(257,230)])
link(Str1,16549455:Value,[(167,191)(41,191)])
}
Add(Memory,16549455,35,63)
{
Default=String()
link(onData,11787960:doEvent1,[(72,69)(72,83)])
}
END_SDK
Add(Hub,6286219,231,161)
{
link(onEvent1,15584895:doString,[(273,167)(273,181)])
link(onEvent2,9318530:doWork1,[(294,174)(294,251)])
}
Add(Hub,15777583,819,196)
{
InCount=2
link(onEvent1,14828705:doAdd,[(851,202)(851,188)])
link(onEvent2,13613827:doWork1,[(875,209)(875,300)])
}
Add(Length,801416,931,182)
{
link(onLength,1062812:doCompare,[])
link(Str,3998827:Var3,[(937,170)(905,170)(905,226)])
}
Add(If_else,1062812,980,182)
{
Type=2
link(onTrue,13856670:doCopy,[])
link(Op1,801416:Result,[(986,170)(962,170)(962,226)(937,226)])
link(Op2,588345:Var2,[])
}
Add(Memory,15621462,973,35)
{
Default=String(5000)
}
Add(Copy,13856670,1043,182)
{
link(onCopy,14828705:doText,[(1087,188)(1087,198)(856,198)(856,209)])
link(Str,3998827:Var1,[(1049,170)(865,170)(865,226)])
link(Position,15120981:Value,[(1056,156)(1049,156)])
link(Count,588345:Var3,[(1063,152)])
}
Add(GetDataEx,588345,987,147)
{
link(Data,15621462:Value,[(993,124)(979,124)])
}
Add(Memory,15120981,1043,98)
{
Default=String(0)
}
Add(GetDataEx,3998827,868,221)
{
link(Data,14828705:Text,[])
}
Add(Memory,5871902,819,42)
{
Default=String(testlog.txt)
}
Add(FormatStr,5289262,392,245)
{
Mask="Ответ получен...\r\n%1"
link(onFString,15308901:doEvent2,[(436,251)(436,209)])
}
Add(Hub,15308901,448,196)
{
InCount=3
link(onEvent1,4720990:doValue,[])
}
Add(FormatStr,11639986,560,196)
{
Mask="==========\r\n%1 > %2\r\n\r\n"
link(onFString,15777583:doEvent1,[])
link(Str1,176083:FormatTime,[(566,174)(587,174)])
link(Str2,4720990:Value,[(573,184)(535,184)(535,240)(496,240)])
}
Add(Time,176083,581,119)
{
Format="[h:m:s]"
}
Add(Memory,4720990,490,196)
{
Default=String()
link(onData,11639986:doString,[])
}
Add(FormatStr,11422444,175,91)
{
Mask="START PROG"
link(onFString,15308901:doEvent3,[(327,97)(327,216)])
}

карма: 0

0
Редактировалось 1 раз(а), последний 2021-02-11 19:32:55