Вверх ↑
Разработчик
Ответов: 26273
Рейтинг: 2142
#1: 2010-06-02 12:28:26 ЛС | профиль | цитата
miver писал(а):
Только при 1000 все равно не прошло

Нормально проходит. Я специально две лишних строчки в формуле добавил, чтобы, уж наверняка, доходило до конца
------------ Дoбавленo в 12.09:
Вот, с синхронизацией шрифта по главному текстовому окну



Add(MainForm,6384440,196,126)
{
Width=422
Height=310
link(onCreate,4864646:doFor,[])
}
Add(ChildScrollBox,6526944,322,140)
{
}
BEGIN_SDK
Add(EditMulti,6945593,21,21)
{
WorkCount=2
Width=391
Height=284
VOffset=14
link(doWork1,12485729:doAdd,[])
link(doWork2,1311866:doEvent1,[(35,48)(35,125)])
}
Add(ScrollBox,4065484,364,35)
{
Left=25
Top=20
Width=369
Height=240
Point(onMouseWheel)
}
Add(Memo,9218888,231,119)
{
Width=60
Height=32767
TabOrder=-1
WinStyle=1
ReadOnly=0
Point(onMouseWheel)
Point(Handle)
Point(doFont)
Point(doHeight)
link(onMouseWheel,9742383:doWork3,[(279,132)])
}
Add(Memo,12485729,105,35)
{
Left=60
Width=288
Height=32767
Font=[MS Sans Serif,12,0,0,1]
WinStyle=1
Name="memo_1"
Point(onMouseWheel)
Point(doHeight)
Point(onKeyDown)
Point(doEnsureVisible)
link(onMouseWheel,9742383:doWork2,[])
}
Add(Math,5328570,315,42)
{
OpType=1
ResultType=0
link(onResult,4065484:doVScroll,[])
link(Op1,4065484:VPos,[(321,30)(349,30)(349,79)(377,79)])
}
Add(HubEx,9742383,275,42)
{
link(onEvent,5328570:doOperation,[])
}
Add(For,4864646,133,119)
{
Start=1
link(onEvent,10002371:doConvert,[])
link(End,6606901:Var3,[(146,110)])
}
Add(Img_Text,7996728,252,203)
{
DrawSource=1
Text="W"
Point(doFont)
link(Bitmap,9218888:Handle,[])
}
Add(Hub,1311866,49,119)
{
OutCount=3
link(onEvent1,4864646:doFor,[])
link(onEvent2,7959765:doFont,[(89,132)(89,209)])
link(onEvent3,7533935:doCalc,[(77,139)(77,265)])
}
Add(Hub,6097771,175,259)
{
link(onEvent1,9218888:doHeight,[(219,265)(219,174)])
link(onEvent2,12485729:doHeight,[(299,272)(299,29)(93,29)(93,83)])
}
Add(MathParse,7533935,112,259)
{
MathStr="(%1 + 2) * %2"
link(onResult,6097771:doEvent1,[])
link(X1,6606901:Var2,[])
link(X2,7996728:TextHeight,[(125,247)(265,247)])
}
Add(FontManager,16105381,126,154)
{
ControlManager="memo_1"
Point(FontCharset)
}
Add(Font,7959765,126,203)
{
Point(CharSet)
link(onFont,12407207:doEvent1,[])
link(Size,16105381:FontSize,[])
link(Color,16105381:FontColor,[])
link(Name,16105381:FontName,[])
link(Style,16105381:FontStyle,[])
link(CharSet,16105381:FontCharset,[])
}
Add(Hub,12407207,175,203)
{
link(onEvent1,9218888:doFont,[(210,209)(210,167)])
link(onEvent2,7996728:doFont,[])
}
Add(GetDataEx,6606901,112,105)
{
link(Data,12485729:Count,[])
}
Add(Convertor,10002371,182,119)
{
Digits=4
SymbolFill="0"
link(onResult,9218888:doAdd,[])
}
END_SDK
Add(For,4864646,252,140)
{
Start=1
End=1000
link(onEvent,6526944:doWork1,[])
link(onStop,6526944:doWork2,[])
}

------------ Дoбавленo в 12.26:
Еще одна версия с более точной подгонкой



Add(MainForm,6384440,196,126)
{
Width=422
Height=310
link(onCreate,4864646:doFor,[])
}
Add(ChildScrollBox,6526944,308,140)
{
}
BEGIN_SDK
Add(EditMulti,6945593,21,21)
{
WorkCount=3
Width=419
Height=312
VOffset=21
link(doWork1,12485729:doAdd,[])
link(doWork2,1311866:doEvent1,[(31,55)(31,153)])
link(doWork3,9051969:doEvent1,[])
}
Add(ScrollBox,4065484,385,42)
{
Left=25
Top=20
Width=369
Height=240
Point(onMouseWheel)
}
Add(Memo,9218888,231,147)
{
Width=60
Height=32767
TabOrder=-1
WinStyle=1
ReadOnly=0
Point(onMouseWheel)
Point(Handle)
Point(doFont)
Point(doHeight)
link(onMouseWheel,9742383:doWork3,[(279,160)])
}
Add(Memo,12485729,105,42)
{
Left=60
Width=288
Height=32767
Font=[MS Sans Serif,12,0,0,1]
WinStyle=1
Name="memo_1"
Point(onMouseWheel)
Point(doHeight)
Point(onKeyDown)
Point(doEnsureVisible)
link(onMouseWheel,9742383:doWork2,[])
}
Add(HubEx,9742383,275,49)
{
link(onEvent,4056346:doCalc,[])
}
Add(For,4864646,133,126)
{
Start=1
link(onEvent,10002371:doConvert,[])
link(End,6606901:Var3,[(146,110)])
}
Add(Img_Text,7996728,252,224)
{
DrawSource=1
Text="W"
Point(doFont)
link(Bitmap,9218888:Handle,[])
}
Add(Hub,1311866,42,147)
{
OutCount=3
link(onEvent1,4864646:doFor,[(94,153)(94,132)])
link(onEvent2,7959765:doFont,[(73,160)(73,230)])
link(onEvent3,7533935:doCalc,[(65,167)(65,286)])
}
Add(Hub,6097771,175,280)
{
link(onEvent1,9218888:doHeight,[(219,286)(219,202)])
link(onEvent2,12485729:doHeight,[(299,293)(299,36)(93,36)(93,90)])
}
Add(MathParse,7533935,112,280)
{
MathStr="(%1 + 1) * %2"
ResultType=0
link(onResult,6097771:doEvent1,[])
link(X1,6606901:Var2,[])
link(X2,7996728:TextHeight,[(125,268)(265,268)])
}
Add(FontManager,16105381,126,175)
{
ControlManager="memo_1"
Point(FontCharset)
}
Add(Font,7959765,126,224)
{
Point(CharSet)
link(onFont,12407207:doEvent1,[])
link(Size,16105381:FontSize,[])
link(Color,16105381:FontColor,[])
link(Name,16105381:FontName,[])
link(Style,16105381:FontStyle,[])
link(CharSet,16105381:FontCharset,[])
}
Add(Hub,12407207,175,224)
{
link(onEvent1,9218888:doFont,[(210,230)(210,195)])
link(onEvent2,7996728:doFont,[])
}
Add(GetDataEx,6606901,112,105)
{
link(Data,12485729:Count,[])
}
Add(Convertor,10002371,182,126)
{
Digits=4
SymbolFill="0"
link(onResult,9218888:doAdd,[(222,132)(222,153)])
}
Add(MathParse,4056346,322,49)
{
DataCount=3
MathStr="((%3 - %2) <= %1) * (%3 - %2) + ((%3 - %2) > %1) * %1 "
ResultType=0
link(onResult,4065484:doVScroll,[])
link(X1,7533935:Result,[(328,37)(308,37)(308,322)(118,322)])
link(X3,4065484:VPos,[(342,37)(370,37)(370,86)(398,86)])
}
Add(Hub,9051969,42,56)
{
link(onEvent1,12485729:doClear,[(81,62)(81,55)])
link(onEvent2,9218888:doClear,[(81,69)(81,160)])
}
END_SDK
Add(For,4864646,252,140)
{
Start=1
End=1000
link(onEvent,6526944:doWork1,[])
link(onStop,6526944:doWork2,[])
}

------------ Дoбавленo в 12.28:
Остается последнее -- синхронизировать с клавиатурой
карма: 22

0