------------ Дoбавленo в 02.34:
Вот так работает на MMTimer-e, но только с мсек
Add(MainForm,2953706,462,217)
{
}
Add(MMTimer,4119969,273,105)
{
Resolution=0
Interval=5
Enable=1
Point(doAutoStop)
Point(onStop)
link(onTimer,11442839:doOperation,[])
link(onStop,8362870:doEvent1,[(317,118)(317,167)])
}
Add(Edit,6806358,217,56)
{
Left=25
Top=5
Width=130
Cursor=1
Text="1000"
}
Add(Math,11442839,399,105)
{
Op2=1
ResultType=0
Point(doClear)
link(Op1,1076077:Var3,[(405,93)(440,93)(440,145)])
}
Add(Button,3654948,105,91)
{
Left=75
Top=35
TabOrder=-1
Caption="Sart"
link(onClick,15544446:doEvent1,[])
}
Add(Hub,15544446,168,91)
{
OutCount=4
link(onEvent1,11442839:doClear,[(330,97)(330,118)])
link(onEvent2,15260899:doData,[(200,104)(200,125)])
link(onEvent3,4119969:doTimer,[])
link(onEvent4,4631823:doStart,[(196,118)(196,216)])
}
Add(DoData,15260899,217,119)
{
link(onEventData,4119969:doAutoStop,[])
link(Data,6806358:Text,[])
}
Add(TimeCounter,4631823,399,210)
{
link(onStop,2953706:doCaption,[])
}
Add(Edit,14665970,399,168)
{
Left=180
Top=5
Width=130
Cursor=1
Text=""
link(Str,1076077:Var2,[])
}
Add(Hub,8362870,329,161)
{
link(onEvent1,4631823:doStop,[(360,167)(360,223)])
link(onEvent2,14665970:doText,[])
}
Add(GetDataEx,1076077,399,140)
{
link(Data,11442839:Result,[])
}
Но ни в коем случае, никакие визуальные компоненты нельзя цеплять к выходу onTimer