Вверх ↑
Ответов: 2059
Рейтинг: 132
#1: 2015-04-14 20:52:16 ЛС | профиль | цитата
Типичная задача для SQLite.
Наверное и примеры должны быть.
Другой вариант, перебор строк (MST_ArrayRows) и разложение многомерного потока.
Во втором варианте компонентов будет больше.
Add(MainForm,12120411,203,112)
{
Width=756
Height=682
link(onCreate,12375421:doEvent1,[(254,132)(254,104)])
}
Add(StrList,10530152,441,70)
{
Strings=#39:Иванов;1001;красный;2;фишка1;foto9.jpg|38:Петров;1002;Иванов;2;фишка2;foto9.jpg|43:Сидоров;1003;фиолетовый;1;фишка3;foto9.jpg|41:Васечкин;1004;зеленый;4;фишка4;foto9.jpg|41:Сахарович;1005;желтый;3;фишка5;foto9.jpg|38:Корейка;1006;серый;1;фишка6;foto9.jpg|40:Балабанов;1007;белый;3;фишка7;foto9.jpg|
}
Add(MT_String,15141203,546,161)
{
link(onResult,2301447:doRowAction,[])
}
Add(MST_RowAction,2301447,595,161)
{
MSTControl="tab"
}
Add(ArrayEnum,6797691,455,161)
{
link(onItem,10615940:doWork2,[(495,167)(495,181)])
link(Array,10530152:Array,[])
}
Add(MTStrTbl,14260304,504,84)
{
Left=5
Top=5
Width=730
Height=205
Name="tab"
Columns=#5:1=100|5:2=100|5:3=100|5:4=100|5:5=100|5:6=100|
}
Add(Button,3037701,175,224)
{
Left=15
Top=225
Width=80
Caption="Искать"
link(onClick,7716855:doEvent1,[(289,230)(289,370)])
}
Add(ArrayEnum,2115205,504,371)
{
link(onItem,16139014:doSeparateMT,[])
link(Array,9527170:Strings,[])
}
Add(Edit,15413565,406,266)
{
Left=125
Top=225
Width=235
Text="Иванов"
}
Add(MST_Clear,13548542,315,56)
{
MSTControl="tab"
}
Add(HubEx,10615940,518,175)
{
link(onEvent,15141203:doMTString,[])
}
Add(MST_ArrayRows,9527170,504,266)
{
MSTControl="tab"
}
Add(Hub,12375421,273,98)
{
link(onEvent1,13548542:doClear,[(301,104)(301,62)])
link(onEvent2,6797691:doEnum,[(371,111)(371,167)])
}
Add(RichEdit,13786822,700,364)
{
Left=385
Top=310
Width=215
Height=240
}
Add(MT_MultiData,16139014,560,371)
{
link(onData1,10753387:doCompare,[])
}
Add(StrMask,10753387,623,371)
{
Point(doMask)
link(onTrue,13786822:doAdd,[(677,384)(677,370)])
}
Add(Hub,7716855,371,364)
{
link(onEvent1,11291371:doData,[(395,370)(395,335)])
link(onEvent2,2115205:doEnum,[])
}
Add(DoData,11291371,406,329)
{
link(onEventData,10753387:doMask,[(530,335)(530,384)])
link(Data,15413565:Text,[])
}


карма: 6

0