Леонид, [flood]это диагноз, с этим и живу
[/flood]------------ Дoбавленo в 08.00:
да кстати, может кто знает как в StringTable перемещать строки, сам изящного решения не нашёл (огород получался), пришлось писать процедуру, хотя задачка то два пальца об...ть, нужно обменять два значение в массиве, может у кого есть варианты? Вот шаблон если что
Add(MainForm,2953706,49,70)
{
Width=501
Height=267
link(onCreate,15529308:doFor,[])
}
Add(ListBox,6713694,329,119)
{
Left=10
Top=10
Width=190
Height=210
Point(Index)
Point(doUp)
Point(doDown)
}
Add(For,15529308,112,84)
{
End=20
link(onEvent,11840486:doStrCat,[])
}
Add(StrCat,11840486,175,84)
{
Str1="name- "
link(onStrCat,534043:doEvent1,[])
}
Add(Button,13842813,238,161)
{
Left=210
Top=10
Width=25
Caption="+"
link(onClick,6713694:doUp,[])
}
Add(Button,622049,238,203)
{
Left=210
Top=35
Width=25
Caption="-"
link(onClick,6713694:doDown,[(300,209)(300,174)])
}
Add(Hub,534043,238,84)
{
link(onEvent1,14305467:doAdd,[])
link(onEvent2,6713694:doAdd,[(290,97)(290,125)])
}
Add(StringTable,14305467,504,84)
{
Left=250
Top=10
Width=190
Height=210
Columns=#4:name|
Point(Strings)
Point(Index)
}
Add(Button,4403132,427,161)
{
Left=450
Top=10
Width=25
Caption="+"
}
Add(Button,2173848,427,203)
{
Left=450
Top=35
Width=25
Caption="-"
}
Add(InfoTip,13190151,504,161)
{
Info=#0:|1:?|
Font=[MS Sans Serif,24,0,255,1]
Height=74
}
Поиск
Друзья
Администрация