Вверх ↑
Ответов: 133
Рейтинг: 0
#1: 2022-08-07 18:48:02 ЛС | профиль | цитата
Все получилось )
Add(MainForm,6062308,301,63)
{
Width=346
Height=361
Caption=""
BorderStyle=1
link(onCreate,15933355:doEvent1,[])
}
Add(DateDiff,4274886,854,595)
{
Point(Hours)
link(onCalc,2822326:doEvent1,[])
link(DateTime1,3758407:Result,[])
link(DateTime2,5203541:Result,[(867,537)(769,537)])
}
Add(Label,2828131,952,595)
{
Left=145
Top=10
Width=18
Height=36
Font=[MS Sans Serif,20,0,0,1]
Caption="0"
link(Text,1322988:Var3,[(958,583)(891,583)(891,635)])
}
Add(DateConvertor,5203541,763,448)
{
Mode=8
Format="dd dd MM yyyy HH:mm:ss"
Point(Data)
Point(Result)
link(Data,8732300:Var1,[(769,390)])
}
Add(Memory,12519540,504,182)
{
Point(Data)
link(onData,8472128:doMultiReplace,[(541,188)(541,279)])
}
Add(DateConvertor,3758407,854,448)
{
Mode=8
Format="dd dd MM yyyy HH:mm:ss"
Point(Data)
Point(Result)
link(Data,560544:Var3,[(860,425)])
}
Add(HTTPClient,15319530,476,84)
{
FileName="sitemap.xml"
ResumeDL=1
Point(RawHeaders)
Point(doResumeDL)
link(onFinish,13136470:doEvent1,[])
}
Add(BlockFind,9438125,462,182)
{
IncludeBlock=1
StartBlock="Last-Modified: "
EndBlock=" GMT"
link(onSearch,12519540:doValue,[])
link(Text,5475334:Var3,[(468,124)])
}
Add(Hub,13136470,532,91)
{
OutCount=3
link(onEvent1,9438125:doSearch,[(558,97)(558,122)(457,122)(457,188)])
link(onEvent2,7954790:doSearch,[(550,104)(550,153)])
link(onEvent3,7592200:doTimer,[(665,111)(665,601)])
}
Add(BlockFind,7954790,728,147)
{
IncludeBlock=1
StartBlock="Date: "
EndBlock=" GMT"
link(onSearch,6809043:doValue,[])
link(Text,5475334:Var2,[(734,131)(496,131)])
}
Add(GetDataEx,5475334,490,119)
{
link(Data,15319530:RawHeaders,[])
}
Add(Memory,6809043,770,147)
{
Point(Data)
link(onData,7356010:doMultiReplace,[(810,153)(810,216)])
}
Add(ListBox,8105427,826,161)
{
Left=210
Top=210
Width=95
Height=30
Visible=1
Strings=#8:Mon,~01§|8:Tue,~02§|8:Wed,~03§|8:Thu,~04§|8:Fri,~05§|8:Sat,~06§|8:Sun,~00§|9:Jan~:01:§|9:Feb~:02:§|9:Mar~:03:§|9:Apr~:04:§|9:May~:05:§|9:Jun~:06:§|9:Jul~:07:§|9:Aug~:08:§|9:Sep~:09:§|9:Oct~:10:§|9:Nov~:11:§|9:Dec~:12:§|
}
Add(MultiReplace,7356010,819,210)
{
Delimiter="~"
EndSymbol="§"
Mode=1
link(onResult,13146269:doReplace,[(863,216)(863,240)(807,240)(807,265)])
link(Text,6809043:Value,[(825,194)(776,194)])
link(ReplaceList,8105427:Text,[])
}
Add(ListBox,11892892,553,224)
{
Left=210
Top=250
Width=95
Height=30
Visible=1
Strings=#8:Mon,~01§|8:Tue,~02§|8:Wed,~03§|8:Thu,~04§|8:Fri,~05§|8:Sat,~06§|8:Sun,~00§|9:Jan~:01:§|9:Feb~:02:§|9:Mar~:03:§|9:Apr~:04:§|9:May~:05:§|9:Jun~:06:§|9:Jul~:07:§|9:Aug~:08:§|9:Sep~:09:§|9:Oct~:10:§|9:Nov~:11:§|9:Dec~:12:§|
}
Add(MultiReplace,8472128,546,273)
{
Delimiter="~"
EndSymbol="§"
Mode=1
link(onResult,6484580:doReplace,[(590,279)(590,303)(534,303)(534,328)])
link(Text,12519540:Value,[(552,243)(510,243)])
link(ReplaceList,11892892:Text,[])
}
Add(Memo,3873322,721,490)
{
Left=10
Top=100
Width=140
Height=100
link(Str,560544:Var2,[(727,460)(720,460)])
}
Add(Replace,13146269,819,259)
{
SubStr=" :"
DestStr=" "
link(onReplace,6614014:doValue,[])
link(Str,7356010:Result,[])
}
Add(Replace,10593762,861,308)
{
SubStr=": "
DestStr=" "
link(onReplace,14970206:doValue,[])
link(Str,6614014:Value,[])
}
Add(Memory,6614014,861,259)
{
Point(Data)
link(onData,10593762:doReplace,[(905,265)(905,289)(849,289)(849,314)])
}
Add(Memory,14970206,903,308)
{
Point(Data)
link(onData,12789203:doEvent1,[(951,314)(951,391)])
}
Add(Replace,6484580,546,322)
{
SubStr=" :"
DestStr=" "
link(onReplace,5645014:doValue,[])
link(Str,8472128:Result,[])
}
Add(Replace,725558,588,371)
{
SubStr=": "
DestStr=" "
link(onReplace,8502662:doValue,[])
link(Str,5645014:Value,[])
}
Add(Memory,5645014,588,322)
{
Point(Data)
link(onData,725558:doReplace,[(632,328)(632,352)(576,352)(576,377)])
}
Add(Memory,8502662,630,371)
{
Point(Data)
link(onData,10088036:doEvent1,[(678,377)(678,328)])
}
Add(GetDataEx,560544,714,420)
{
Angle=3
link(Data,8502662:Value,[(636,425)])
}
Add(Hub,10088036,693,322)
{
link(onEvent1,3758407:doConvert,[(781,328)(781,454)])
link(onEvent2,3873322:doAdd,[(711,335)(711,496)])
}
Add(Memo,3632,973,476)
{
Left=180
Top=100
Width=140
Height=100
link(Str,8732300:Var2,[(979,437)(895,437)])
}
Add(GetDataEx,8732300,889,385)
{
Angle=1
link(Data,14970206:Value,[(909,390)])
}
Add(Hub,12789203,966,385)
{
link(onEvent1,3632:doAdd,[(992,391)(992,437)(962,437)(962,482)])
link(onEvent2,5203541:doConvert,[(992,398)(992,426)(751,426)(751,454)])
}
Add(Timer,7592200,784,595)
{
Interval=5000
Enable=1
AutoStop=1
link(onTimer,4274886:doCalc,[])
}
Add(Label,12131401,672,490)
{
Left=10
Top=70
Width=151
Height=17
Caption="Дата-время создания файла"
}
Add(Label,9773500,1022,476)
{
Left=180
Top=70
Width=110
Height=17
Caption="Дата-время сервера"
}
Add(Label,11458222,952,546)
{
Left=10
Top=20
Width=120
Height=17
Caption="Часов после создания"
}
Add(Memo,2568247,889,819)
{
Left=10
Top=240
Width=180
Height=70
ScrollBars=3
link(Str,1877038:FormatTime,[])
}
Add(Time,1877038,889,770)
{
}
Add(If_else,5705247,875,686)
{
Type=2
Op1=String(0)
Op2=String(24)
link(onTrue,2568247:doAdd,[(919,692)(919,758)(877,758)(877,825)])
link(Op1,1322988:Var2,[(881,664)(874,664)])
}
Add(GetDataEx,1322988,868,630)
{
Angle=3
link(Data,4274886:Hours,[(860,635)])
}
Add(Hub,2822326,910,595)
{
link(onEvent1,2828131:doText,[])
link(onEvent2,5705247:doCompare,[(936,608)(936,650)(863,650)(863,692)])
}
Add(Label,10383757,833,770)
{
Left=10
Top=210
Width=71
Height=17
Caption="Дата ошибки"
}
Add(Timer,6936113,385,119)
{
Interval=3600000
Enable=1
link(onTimer,16661090:doEvent1,[(425,125)(425,97)])
}
Add(Hub,15933355,357,77)
{
link(onEvent1,16661090:doEvent2,[(403,83)(403,104)])
link(onEvent2,6936113:doTimer,[(378,90)(378,125)])
}
Add(Hub,16661090,434,91)
{
InCount=2
link(onEvent1,15319530:doLoadFile,[])
}

карма: 1

0
Редактировалось 3 раз(а), последний 2022-08-07 19:25:08