а список у тебя не простой...короче надо немного по другому. Будет время нарисую...если кто первый не нарисует.
------------ Дoбавленo в 20.13:
все это лучше делать с помощью sqlite. Там это быстро все реализуется.
------------ Дoбавленo в 21.25:
вот тебе на скорую руку...игра элементами...без sql
это к слову
Ravilr писал(а): Там тебе осталось одну кнопку с полем добавить и пару связей.
Add(MainForm,1454047,98,133)
{
Width=410
Height=363
link(onCreate,11662533:doLoad,[(191,153)(191,146)])
}
Add(TreeView,4356397,147,112)
{
Width=105
Height=336
Align=1
Strings=#7:место 1|1:(|7:точка 1|7:точка 2|1:)|7:место 2|1:(|7:точка 3|7:точка 4|
Icons=[]
Point(Index)
link(onClick,15097888:doEvent1,[])
}
Add(ListBox,13348849,448,126)
{
Left=105
Width=297
Height=336
Align=5
}
Add(StrList,11662533,266,112)
{
FileName="hg"
Strings=#17:точка 1 , точка 2|7:точка 1|7:точка 2|17:точка 3 , точка 4|7:точка 3|7:точка 4|
Point(IdxToSelect)
Point(doGetString)
Point(onGetString)
Point(doReplace)
Point(Index)
link(Str,7562969:Value,[])
link(IdxToSelect,5878620:Var3,[(286,100)(198,100)(198,163)])
link(onGetString,13281859:doWork2,[])
}
Add(StrPart,3528358,322,119)
{
Char=","
Point(Right)
Point(onNotFound)
link(onSplit,13281859:doWork3,[(369,125)(369,105)(310,105)])
link(onPart,1106221:doWork2,[])
link(onNotFound,1106221:doWork3,[(368,139)])
}
Add(HubEx,13281859,306,112)
{
link(onEvent,3528358:doSplit,[])
}
Add(HubEx,1106221,364,119)
{
link(onEvent,7327228:doWork2,[])
}
Add(Hub,15097888,210,119)
{
link(onEvent1,13348849:doClear,[(240,125)(240,92)(385,92)(385,139)])
link(onEvent2,11662533:doGetString,[(240,132)(240,160)])
}
Add(Replace,7736186,448,196)
{
SubStr="
"
DestStr=","
link(onReplace,8534422:doEvent1,[(489,202)(489,243)(92,243)(92,188)])
link(Str,13348849:Text,[])
}
Add(Memory,7562969,266,49)
{
}
Add(Hub,8534422,105,182)
{
link(onEvent1,7562969:doValue,[(141,188)(141,55)])
link(onEvent2,11266448:doData,[])
}
Add(DoData,11266448,169,189)
{
link(onEventData,15709560:doEvent1,[])
link(Data,5878620:Var2,[])
}
Add(Edit,923764,385,7)
{
Left=177
Top=310
Width=155
Text="name"
}
Add(HubEx,7327228,420,119)
{
link(onEvent,13348849:doAdd,[])
}
Add(Button,41228,322,196)
{
Left=335
Top=310
Name="s"
Caption="save"
link(onClick,7736186:doReplace,[])
}
Add(GetDataEx,5878620,162,154)
{
Angle=3
link(Data,4356397:Index,[(167,163)])
}
Add(Hub,15709560,210,189)
{
link(onEvent1,11662533:doReplace,[(241,195)(241,167)])
link(onEvent2,11662533:doSave,[(232,202)(232,153)])
}
Add(DoData,1657638,385,49)
{
link(onEventData,7327228:doWork1,[(424,55)])
link(Data,923764:Text,[])
}
Add(Button,15826754,322,49)
{
Left=110
Top=310
Caption="add"
link(onClick,1657638:doData,[])
}
|
Поиск
Друзья
Администрация