Вверх ↑
Разработчик
Ответов: 26170
Рейтинг: 2127
#1: 2013-09-20 17:03:10 ЛС | профиль | цитата
На еще вариант с отрисовкой фрейма

Add(MainForm,8727057,112,119)
{
Width=517
Height=166
Caption=""
Point(onChar)
link(onCreate,2180946:doEnum,[])
link(onChar,16141752:doCase,[(172,146)(172,188)])
}
Add(StrList,11546707,168,56)
{
Strings=#11:1;2;3;4;5;6|17:11;22;33;44;55;66|19:77;88;99;00;123;145|18:qw;er;df;cv;ty;cvb|
}
Add(ArrayEnum,2180946,182,133)
{
link(onItem,4793532:doMTString,[])
link(Array,11546707:Array,[])
}
Add(MTStrTbl,899381,700,196)
{
Left=10
Top=5
Width=485
Height=120
Name="tab"
Columns=#1:1|1:2|1:3|1:4|1:5|1:6|
Point(Handle)
Point(Left)
Point(Top)
link(onClick,7617029:doWork3,[(760,202)])
link(onClientRect,13908246:doValue,[])
}
Add(MST_RowAction,13316852,301,119)
{
MSTControl="tab"
}
Add(MT_String,4793532,238,119)
{
link(onResult,13316852:doRowAction,[])
}
Add(Case,16141752,182,182)
{
Value=String(27)
link(onNextCase,4987009:doStrCat,[])
link(onTrue,6223684:doEvent1,[])
}
Add(StrCat,4987009,301,182)
{
Point(doClear)
link(onStrCat,13847939:doEvent1,[])
link(Str1,13216037:Var1,[(307,173)(293,173)(293,222)])
}
Add(Hub,6223684,245,189)
{
link(onEvent1,4987009:doClear,[])
link(onEvent2,2774382:doData,[(284,202)(284,244)])
}
Add(DoData,2774382,301,238)
{
link(onEventData,11291689:doWork2,[])
link(Data,13216037:Var2,[])
}
Add(GetDataEx,13216037,301,217)
{
link(Data,4987009:Result,[])
}
Add(HubEx,11291689,371,238)
{
Angle=1
link(onEvent,9084450:doEvent1,[(375,279)(44,279)(44,118)])
}
Add(Hub,13847939,350,182)
{
link(onEvent1,11291689:doWork1,[(375,188)])
link(onEvent2,12746650:doFindText,[])
}
Add(MST_FindText,12746650,392,189)
{
MSTControl="tab"
link(onFindText,16316540:doEvent1,[])
}
Add(MT_MultiData,11050912,532,196)
{
From=2
Count=1
link(onData1,12466610:doCompare,[])
}
Add(If_else,12466610,581,196)
{
link(onTrue,820670:doAdd,[])
link(onFalse,7617029:doWork2,[(620,209)(620,181)])
link(Op1,13216037:Var3,[(587,173)(342,173)(342,222)])
}
Add(MT_Add,820670,651,196)
{
InputMT=2
link(onAdd,899381:doClientRect,[])
link(Data,11145583:Value,[(657,187)(643,187)(643,236)(489,236)])
}
Add(MT_Memory,11145583,483,196)
{
link(onData,11050912:doSeparateMT,[])
}
Add(Img_Rectangle,11765617,763,343)
{
Point2AsOffset=0
DrawSource=1
rX=1
rY=1
Color=255
Point(Point1)
Point(Point2)
link(Bitmap,899381:Handle,[(769,334)(727,334)(727,271)(734,271)])
link(Point1,13282704:reCalc,[(783,327)(748,327)])
link(Point2,10436596:Point,[])
}
Add(MT_MultiMem,13908246,770,217)
{
Count=4
link(onData,3812185:doEvent1,[])
}
Add(PointXY,10436596,784,280)
{
link(X,13908246:Value3,[])
link(Y,13908246:Value4,[])
}
Add(MathParse,13282704,735,280)
{
DataCount=4
MathStr="(%4 - %2 - 2) * 65536 + %3 - %1 - 2"
Point(reCalc)
link(X1,899381:Left,[])
link(X2,899381:Top,[])
link(X3,13908246:Value1,[(755,257)(776,257)])
link(X4,13908246:Value2,[(762,264)(783,264)])
}
Add(Timer,5201153,847,224)
{
Interval=10
Enable=1
AutoStop=1
link(onTimer,11765617:doDraw,[(886,230)(886,384)(753,384)(753,349)])
}
Add(RedrawManager,6209329,847,175)
{
ControlManager="tab"
EraseMode=0
}
Add(Hub,3812185,812,217)
{
link(onEvent1,6384763:doWork3,[(837,223)])
link(onEvent2,5201153:doTimer,[])
}
Add(Hub,9084450,63,112)
{
link(onEvent1,12294690:doRedraw,[(88,118)(88,83)])
link(onEvent2,8727057:doCaption,[])
}
Add(RedrawManager,12294690,112,77)
{
ControlManager="tab"
EraseMode=0
}
Add(Hub,16316540,441,189)
{
link(onEvent1,8868867:doSelect,[(466,195)(466,125)])
link(onEvent2,11145583:doValue,[])
}
Add(MST_SelectRow,8868867,483,119)
{
IndexSelect=-1
MSTControl="tab"
}
Add(HubEx,6384763,833,175)
{
link(onEvent,6209329:doRedraw,[])
}
Add(HubEx,7617029,756,175)
{
link(onEvent,6384763:doWork2,[])
}


------------ Дoбавленo в 16.31:
upd: убрал селектор при поиске, мешает он
------------ Дoбавленo в 16.57:
upd: добавил очистку фрейма, если значение не найдено
------------ Дoбавленo в 17.03:
upd: уменьшил таймер, чтобы не мешала задержка
карма: 22

1
Голосовали:Konst