Add(Screen,14472371,168,399)
{
}
------------ Дoбавленo:
Примерно так:
Add(MainForm,2953706,574,112)
{
Left=1084
Top=580
Width=115
Height=61
Color=65280
Font=[MS Sans Serif,2,0,0,1]
Caption="Погода в Смеле"
BorderStyle=6
DragForm=0
TransparentColor=65280
Point(Handle)
Point(doLeft)
Point(doTop)
Point(Width)
Point(Height)
link(onCreate,11134000:doEvent1,[(635,132)(635,40)(415,40)(415,181)])
}
Add(WebBrowser,11322135,364,133)
{
Width=115
Height=61
Align=5
Color=65280
Point(doFromText)
Point(Handle)
}
Add(StrList,12229435,308,84)
{
Strings=#6:<html>|23:<style type="text/css">|25:BODY { overflow: hidden }|8:</style>|24:<body bgcolor="#00FF00">|53:<SPAN STYLE="position: absolute; top:0px; left:0px;">|201:<script>URL='http://img.gismeteo.Ru/flash/120x60_2.swf?city=33593&cset=2';w='120';h='60';value='33593&cset=2';lang='ru'</script><script src='http://informer.gismeteo.Ru/flash/fcode.js'></script></SPAN>|7:</body>|7:</html>|
}
Add(DoData,11807615,308,161)
{
link(onEventData,11322135:doFromText,[])
link(Data,12229435:Text,[])
}
Add(Screen,11690367,462,49)
{
}
Add(Hub,11134000,427,175)
{
OutCount=3
link(onEvent1,14510030:doCalc,[(456,181)(456,118)])
link(onEvent2,14973543:doCalc,[])
link(onEvent3,15407742:doTimer,[(448,195)(448,230)])
}
Add(MathParse,14973543,504,182)
{
MathStr="%1 - %2*3"
ResultType=0
link(onResult,2953706:doTop,[(555,188)(555,153)])
link(X1,11690367:Height,[(510,151)(475,151)])
link(X2,2953706:Height,[(517,173)(594,173)])
}
Add(MathParse,14510030,504,112)
{
MathStr="%1 - %2-10"
ResultType=0
link(onResult,2953706:doLeft,[(555,118)(555,146)])
link(X1,11690367:Width,[(510,96)(468,96)])
link(X2,2953706:Width,[(517,100)(552,100)(552,169)(587,169)])
}
Add(Time,10572404,231,84)
{
Format="h"
Point(Hours)
}
Add(ChangeMon,16693002,238,161)
{
link(onData,11807615:doData,[])
link(Data,10572404:Hours,[])
}
Add(Timer,4922180,189,161)
{
Interval=3600000
link(onTimer,13601066:doWork2,[])
}
Add(HubEx,13601066,224,154)
{
link(onEvent,16693002:doData,[])
}
Add(Timer,15407742,504,224)
{
Enable=1
AutoStop=1
link(onTimer,13601066:doWork3,[(547,230)(547,263)(228,263)])
}
А вот почему в Смеле после 12 дня настает воскресенье - это загадка.
------------ Дoбавленo:
nesco, и вторая загадка - что-то с событием MainForm.onCreate не то - часто приходится ставить таймер.