all
Add(MainForm,13201634,392,287)
{
Width=565
Height=293
link(onCreate,3160223:doData,[])
}
Add(DatePicker,5407675,511,301)
{
Left=45
Top=40
Width=110
Height=21
Font=[Courier New,12,1,0,204]
DateMode=1
Time=0
Point(DateTime)
Point(CurrentDateTime)
}
Add(Button,686014,315,399)
{
Left=165
Top=40
Caption="start"
link(onClick,3351686:doTimer,[])
}
Add(DoData,3160223,448,301)
{
Data=Integer(736000)
link(onEventData,822500:doWork2,[])
}
Add(MathParse,11549991,511,399)
{
MathStr="%1- 1/86400"
link(onResult,14592317:doEvent1,[])
link(X1,9780590:Var2,[])
}
Add(Timer,3351686,448,399)
{
Enable=1
link(onTimer,11549991:doCalc,[])
}
Add(HubEx,822500,490,301)
{
link(onEvent,5407675:doSetDate,[])
}
Add(Math,3283021,588,406)
{
OpType=36
Op2=1
link(onResult,6505826:doCompare,[])
}
Add(Hub,14592317,560,399)
{
OutCount=3
link(onEvent1,822500:doWork1,[(585,405)(586,369)(585,298)(494,298)])
link(onEvent2,3283021:doOperation,[])
link(onEvent3,9730680:doData,[(586,419)(586,387)(506,387)(506,356)])
}
Add(If_else,6505826,630,406)
{
Op2=Integer(0)
link(onTrue,13134762:doEvent1,[])
}
Add(Beep,3082080,728,413)
{
Duration=1000
}
Add(Hub,13134762,686,406)
{
link(onEvent1,4871259:doWork3,[(769,412)(769,450)(436,450)])
link(onEvent2,3082080:doBeep,[])
}
Add(Label,3040698,651,350)
{
Left=15
Top=5
Width=260
Font=[MS Sans Serif,8,1,255,1]
Caption=""
AutoSize=1
Alignment=2
}
Add(DateConvertor,10963874,588,350)
{
Mode=9
Format="HH:mm:ss"
link(onResult,3040698:doText,[])
}
Add(DoData,9730680,518,350)
{
link(onEventData,10963874:doConvert,[])
link(Data,9780590:Var3,[(524,341)])
}
Add(Button,1291455,364,406)
{
Left=230
Top=40
Caption="stop"
link(onClick,4871259:doWork2,[])
}
Add(HubEx,4871259,432,406)
{
link(onEvent,3351686:doStop,[])
}
Add(GetDataEx,9780590,511,336)
{
link(Data,5407675:DateTime,[])
}
Tad писал(а):
А зачем ?ну красиво оформить и тд.