Вверх ↑
Ответов: 246
Рейтинг: 13
#1: 2010-06-01 17:44:10 ЛС | профиль | цитата
Попробую...
------------ Дoбавленo в 17.40:
Вот:

Add(MainForm,2953706,63,224)
{
Width=598
Height=415
link(onCreate,15538467:doEvent1,[])
}
Add(Memo,9902246,392,147)
{
Left=115
Top=45
Width=245
Height=255
Point(doSetSelStart)
Point(doEnsureVisible)
}
Add(Memo,9012312,322,147)
{
Left=85
Top=45
Width=25
Height=255
Point(doSetSelStart)
Point(doEnsureVisible)
}
Add(ScrollBar,2505655,476,147)
{
Left=365
Top=45
Width=20
Height=255
Kind=1
Point(doMax)
link(onPosition,14949926:doOperation,[])
}
Add(StrList,10383619,252,147)
{
Strings=#10:1;Строка 1|10:2;Строка 2|10:3;Строка 3|10:4;Строка 4|10:5;Строка 5|10:6;Строка 6|10:7;Строка 7|10:8;Строка 8|10:9;Строка 9|12:10;Строка 10|12:11;Строка 11|12:12;Строка 12|12:13;Строка 13|12:14;Строка 14|12:15;Строка 15|12:16;Строка 16|12:17;Строка 17|12:18;Строка 18|12:19;Строка 19|12:20;Строка 20|12:21;Строка 21|12:22;Строка 22|12:23;Строка 23|12:24;Строка 24|12:25;Строка 25|12:26;Строка 26|12:27;Строка 27|12:28;Строка 28|12:29;Строка 29|12:30;Строка 30|
Point(onGetString)
Point(doGetString)
link(onGetString,8682410:doSplit,[(296,160)(296,248)(247,248)(247,335)])
}
Add(DoData,6188485,210,238)
{
link(onEventData,2505655:doMax,[(458,244)(458,160)])
link(Data,10383619:Count,[(216,218)(265,218)])
}
Add(ArrayEnum,2894052,210,280)
{
link(onItem,15975827:doSplit,[])
link(Array,10383619:Array,[(216,273)(272,273)])
}
Add(Hub,15538467,133,238)
{
OutCount=3
link(onEvent1,6188485:doData,[])
link(onEvent2,2894052:doEnum,[(179,251)(179,286)])
}
Add(StrPart,15975827,259,280)
{
Char=";"
link(onSplit,9902246:doAdd,[(369,286)(369,153)])
link(onPart,9012312:doAdd,[(359,293)(359,216)(310,216)(310,153)])
}
Add(Math,14949926,539,147)
{
OpType=1
Op2=1
link(onResult,10383619:doGetString,[(583,153)(583,174)(240,174)(240,195)])
link(Op1,2505655:Position,[(545,135)(513,135)(513,191)(482,191)])
}
Add(StrPart,8682410,259,329)
{
Char=";"
link(onSplit,8523660:doSearch,[])
link(onPart,14249917:doSearch,[])
}
Add(Position,8523660,315,329)
{
link(onSearch,5538097:doData,[(359,335)(359,359)(303,359)(303,384)])
link(Str,9902246:Text,[(321,267)(398,267)])
}
Add(DoData,5538097,308,378)
{
link(onEventData,6393929:doEvent1,[])
link(Data,8523660:Position,[(314,370)(321,370)])
}
Add(Position,14249917,392,336)
{
link(onSearch,2160673:doData,[(436,342)(436,366)(380,366)(380,391)])
link(Str,9012312:Text,[(398,271)(328,271)])
}
Add(DoData,2160673,392,385)
{
link(onEventData,6160403:doEvent1,[])
link(Data,14249917:Position,[])
}
Add(Hub,6393929,350,378)
{
link(onEvent1,9902246:doSetSelStart,[(378,384)(378,195)])
link(onEvent2,9902246:doEnsureVisible,[(378,391)(378,202)])
}
Add(Hub,6160403,434,385)
{
link(onEvent1,9012312:doSetSelStart,[(460,391)(460,293)(310,293)(310,195)])
link(onEvent2,9012312:doEnsureVisible,[(460,398)(460,300)(310,300)(310,202)])
}

Правда скролл не идет ни в первой, ни во второй.
------------ Дoбавленo в 17.44:
Хотя должен
карма: 0

0