Dilma писал(а):
но схема-то приведена не эквивалентнаяЭто почему ?
------------ Дoбавленo:
Да, точно, понял почему
------------ Дoбавленo:
Ну Dilma, ну поймал ты меня, заставил думать Вот эквивалентная схема на новом компоненте
Add(MainForm,5444796,98,231)
{
}
Add(StrList,7649755,98,161)
{
Strings=#5:0;1;2|3:2;3|7:0;1;2;3|
Point(doGetString)
Point(onGetString)
Point(IdxToSelect)
link(onGetString,7237971:doSplit,[])
}
Add(Counter,14381474,329,119)
{
Max=1
Default=1
link(onNext,5673322:doCaption,[])
}
Add(Counter,1017723,329,175)
{
Max=1
link(onNext,5337471:doCaption,[])
}
Add(Counter,11176574,329,238)
{
Max=1
link(onNext,13763611:doCaption,[])
}
Add(Button,5673322,385,119)
{
Left=95
Top=45
Data=Integer(0)
Point(doCaption)
link(onClick,4445566:doWork2,[])
}
Add(Button,5337471,385,175)
{
Left=165
Top=45
Data=Integer(0)
Point(doCaption)
link(onClick,3511846:doWork2,[])
}
Add(Button,13763611,385,238)
{
Left=235
Top=45
Data=Integer(2)
Point(doCaption)
link(onClick,2505536:doWork2,[])
}
Add(Counter,12450889,329,287)
{
Max=1
link(onNext,11653246:doCaption,[])
}
Add(Button,11653246,385,287)
{
Left=235
Top=90
Data=Integer(1)
Point(doCaption)
link(onClick,2505536:doWork3,[(438,293)])
}
Add(MultiStrData,7237971,147,168)
{
Count=4
link(onPart1,2459174:doWork2,[])
link(onPart2,16179400:doWork2,[])
link(onPart3,1572096:doWork2,[])
link(onPart4,1572096:doWork3,[(200,195)])
}
Add(IndexToChanel,6956415,266,168)
{
Count=4
link(onEvent1,14381474:doNext,[(314,174)(314,125)])
link(onEvent2,1017723:doNext,[])
link(onEvent3,11176574:doNext,[(314,188)(314,244)])
link(onEvent4,12450889:doNext,[(307,195)(307,293)])
}
Add(HubEx,2459174,196,161)
{
link(onEvent,12964010:doCase,[])
}
Add(HubEx,1572096,196,175)
{
Angle=3
link(onEvent,16179400:doWork3,[])
}
Add(HubEx,16179400,196,168)
{
Angle=3
link(onEvent,2459174:doWork3,[])
}
Add(HubEx,2505536,434,231)
{
Angle=3
link(onEvent,3511846:doWork3,[])
}
Add(HubEx,4445566,434,112)
{
Angle=3
link(onEvent,7649755:doGetString,[(438,99)(85,99)(85,209)])
}
Add(HubEx,3511846,434,168)
{
Angle=3
link(onEvent,4445566:doWork3,[])
}
Add(Case,12964010,217,168)
{
Value=String()
link(onNextCase,6956415:doEvent,[])
}
Трудно, правда, сказать -- дает ли она кокое-то приимущество, разве только в размере кодов, да и то... Может, немного в быстродействии, но тут оно до фени.