
------------ Дoбавленo:
Специально для Леонида. Вот моя схема с убранными прибамбасами. Объясни, чем твой принцип отличается от моего

Add(MainForm,6380058,301,231)
{
Width=801
Height=430
link(onCreate,4936505:doEvent1,[])
}
Add(ComboBox,2512629,483,217)
{
Left=5
Top=25
Width=740
Height=21
FileName="Zakaz4ik.txt"
Text="Действия"
DataType=1
Point(EditText)
Point(onKeyDown)
Point(doEditText)
Point(doSelect)
link(Str,3926536:Var3,[(489,205)(520,205)(520,296)])
link(onKeyDown,13155802:doCase,[])
}
Add(StringTable,7109463,637,343)
{
Left=5
Top=110
Width=325
Columns=#9:Запись=50|
Point(doEnsureVisible)
}
Add(Hub,5867691,588,238)
{
OutCount=4
link(onEvent1,2512629:doAdd,[(629,244)(629,193)(471,193)(471,223)])
link(onEvent3,2512629:doSave,[(621,258)(621,301)(461,301)(461,258)])
}
Add(GetDataEx,3926536,490,287)
{
link(Data,2512629:EditText,[])
}
Add(Case,13155802,539,231)
{
Value=Integer(13)
DataOnTrue=String()
link(onTrue,5867691:doEvent1,[])
}
Add(DoData,15466807,413,266)
{
Data=Integer(-1)
}
Add(Hub,4936505,364,245)
{
OutCount=3
link(onEvent1,2512629:doLoad,[])
}
Add(ArrayEnum,1821144,483,371)
{
link(onItem,13441470:doWork2,[(548,377)(548,349)])
link(onEndEnum,5218194:doWork2,[])
}
Add(DoData,1423958,497,322)
{
link(onEventData,5206108:doEvent1,[])
}
Add(HubEx,13441470,581,336)
{
link(onEvent,7109463:doAdd,[])
}
Add(Hub,5206108,546,322)
{
link(onEvent1,13441470:doWork1,[(585,328)])
link(onEvent2,5218194:doWork1,[(571,335)])
}
Add(Math,4180857,581,378)
{
OpType=1
Op2=1
ResultType=0
link(onResult,7109463:doEnsureVisible,[])
link(Op1,7109463:Count,[(587,366)(615,366)(615,400)(643,400)])
}
Add(HubEx,5218194,567,371)
{
link(onEvent,4180857:doOperation,[])
}