Вверх ↑
Ответов: 8961
Рейтинг: 824
#1: 2025-07-27 18:35:18 ЛС | профиль | цитата
Gitarist, если изначально данные хранятся в БД (чего и советую), То конечно. А без БД можно и на рассыпухе:
рассыпуха


Add(MainForm,14297584,98,112)
{
Width=742
Height=454
link(onCreate,1370606:doEnum,[])
}
Add(StrList,13965242,154,70)
{
Strings=#10:йцукенг;11|5:цук;5|6:фыва;8|9:йцукенг;4|9:йцукенг;5|6:фыва;3|8:ячсми;22|9:ячсми;115|10:пролдж;265|9:йцукен;44|9:пролдж;25|7:фыва;74|
}
Add(ArrayEnum,14449548,245,245)
{
link(onItem,12526119:doSplit,[])
link(onEndEnum,1699993:doWork1,[(284,258)(284,377)(508,377)])
link(Array,9725226:Strings,[])
}
Add(MultiStrData,12526119,315,245)
{
link(Str,14449548:Item,[(321,236)(309,236)(309,295)(251,295)])
link(onPart1,6489124:doValue,[])
link(onPart2,9375678:doValue,[])
}
Add(StringTable,14508183,672,385)
{
Left=375
Top=40
Width=285
Height=225
Columns=#11:позиция=100|8:колич=50|
}
Add(StringTable,9725226,231,126)
{
Left=50
Top=40
Width=285
Height=225
Columns=#11:позиция=100|8:колич=50|
Point(Strings)
Point(doSort)
}
Add(ArrayEnum,1370606,154,126)
{
link(onItem,9725226:doAdd,[])
link(Array,13965242:Array,[(160,110)(174,110)])
}
Add(Button,1690297,154,189)
{
Left=275
Top=300
Width=155
Caption="посчитать"
Data=Integer(0)
link(onClick,2541441:doEvent1,[])
}
Add(Hub,2541441,196,189)
{
OutCount=6
link(onEvent1,9725226:doSort,[(221,195)(221,167)])
link(onEvent2,14508183:doClear,[(634,202)(634,398)])
link(onEvent3,11072110:doWork1,[(592,209)])
link(onEvent4,6489124:doClear,[(403,216)(403,258)])
link(onEvent5,9375678:doClear,[(340,223)(340,265)])
link(onEvent6,14449548:doEnum,[(235,230)(235,251)])
}
Add(MemFifo,6489124,434,245)
{
Default=String('')
}
Add(MemFifo,9375678,371,252)
{
Default=Integer(0)
link(onData,4391637:doCompare,[(410,258)(410,279)])
}
Add(MathParse,8931150,602,273)
{
DataCount=1
MathStr="%1 + %0"
ResultType=0
Point(doClear)
}
Add(If_else,4391637,483,273)
{
Op2=Integer(0)
link(onTrue,15034834:doData,[])
link(onFalse,8265293:doCompare,[(522,286)(522,314)(424,314)(424,342)])
link(Op1,14449548:Index,[(489,229)(302,229)(302,284)(258,284)])
}
Add(DoData,15034834,532,273)
{
link(onEventData,10410428:doWork2,[])
link(Data,3532457:Var1,[(538,264)(475,264)])
}
Add(If_else,8265293,434,336)
{
link(onTrue,15380985:doData,[])
link(onFalse,49999:doEvent1,[(480,349)(480,391)])
link(Op1,6489124:Value1,[])
link(Op2,3355562:Var2,[])
}
Add(DoData,15380985,525,336)
{
link(onEventData,12907889:doWork2,[])
link(Data,3532457:Var2,[(531,319)(475,319)])
}
Add(GetDataEx,3532457,469,287)
{
Angle=3
link(Data,4472821:Var3,[])
}
Add(HubEx,10410428,574,273)
{
link(onEvent,8931150:doCalc,[])
}
Add(Hub,49999,483,385)
{
OutCount=3
link(onEvent1,1699993:doWork2,[])
link(onEvent2,11072110:doWork3,[(592,398)])
link(onEvent3,6288697:doData,[(515,405)(515,440)])
}
Add(FormatStr,16184880,525,385)
{
Mask="%1;%2"
link(onFString,14508183:doAdd,[])
link(Str1,3355562:Var3,[(531,376)(517,376)(517,327)])
link(Str2,8931150:Result,[(538,376)(608,376)])
}
Add(GetDataEx,3355562,441,322)
{
link(Data,6489124:Value2,[])
}
Add(HubEx,11072110,588,280)
{
link(onEvent,8931150:doClear,[])
}
Add(DoData,6288697,525,434)
{
link(onEventData,12907889:doWork3,[(578,440)])
link(Data,4472821:Var2,[(531,425)(377,425)])
}
Add(GetDataEx,4472821,371,287)
{
link(Data,9375678:Value1,[])
}
Add(HubEx,12907889,574,336)
{
Angle=3
link(onEvent,10410428:doWork3,[])
}
Add(HubEx,1699993,504,385)
{
link(onEvent,16184880:doString,[])
}

карма: 19

0