Вверх ↑
Разработчик
Ответов: 26303
Рейтинг: 2146
#1: 2007-03-29 22:30:18 ЛС | профиль | цитата
Ntl-M,
вот попробуй.
Add(MainForm,10360514,35,168)
{
Left=20
Top=105
}
Add(Label,949621,560,273)
{
Left=120
Top=20
}
Add(ArrayEnum,4099487,301,266)
{
link(onItem,13292967:doValue,[])
link(onEndEnum,3661275:doData,[])
link(Array,2266020:Array,[])
}
Add(StrList,7195173,301,308)
{
}
Add(ArrayEnum,11071243,315,385)
{
link(onItem,9564495:doCompare,[(366,391)(352,391)])
link(Array,7195173:Array,[(321,380)(321,380)])
}
Add(If_else,9564495,364,385)
{
link(onTrue,12695662:doData,[(406,391)(406,370)(214,370)(214,328)])
link(Op2,13292967:Value,[])
}
Add(StrList,2266020,287,168)
{
Strings=#2:21|1:1|1:4|2:65|1:2|1:5|1:8|1:9|1:3|
}
Add(Button,6793782,35,259)
{
Left=105
Top=90
link(onClick,433458:doEvent1,[])
}
Add(Memory,13292967,371,266)
{
link(onData,11071243:doEnum,[(413,272)(413,341)(305,341)(305,391)])
}
Add(InfoTip,5557379,497,350)
{
Info=#168:Надо, чтобы выдавал не последнее совпавшее сравнение, а только, если все три числа совпадут! Если совпадут два из трех, ничего не дожно выходить, как и при одном числе.|
Font=[MS Sans Serif,8,0,255,1]
Width=148
Height=116
}
Add(DoData,12695662,224,322)
{
link(onEventData,7195173:doDelete,[])
link(Data,11071243:Index,[(230,312)(285,312)(285,427)(328,427)])
}
Add(DoData,3661275,441,273)
{
link(onEventData,519392:doCompare,[])
link(Data,7195173:Count,[(447,263)(387,263)(387,363)(314,363)])
}
Add(StrList,14979153,168,168)
{
Strings=#1:1|1:3|1:5|
}
Add(DoData,4272451,168,329)
{
link(onEventData,7195173:doText,[(250,335)(250,335)])
link(Data,14979153:Text,[])
}
Add(Hub,433458,84,259)
{
link(onEvent1,4272451:doData,[(142,265)(142,335)])
link(onEvent2,4099487:doEnum,[(212,272)(212,272)])
}
Add(If_else,519392,497,273)
{
Op2=Integer(0)
link(onTrue,949621:doText,[])
}
карма: 22

0