Вверх ↑
Ответов: 2236
Рейтинг: 676
#1: 2020-06-06 23:12:37 ЛС | профиль | цитата
germes5558, возможно эта схема поможет:

Add(MainForm,2953706,224,308)
{
Width=309
Height=417
Position=1
link(onCreate,15102426:doSearch,[])
}
Add(BitmapArray,13690688,441,252)
{
Bitmaps=[]
}
Add(Img_Bmp,13429568,595,357)
{
Point(X)
Point(Y)
link(onDraw,3616874:doNext,[(699,363)(699,278)(597,278)(597,300)])
link(Bitmap,8231436:Var1,[(601,345)(587,345)])
link(SourceBitmap,12794161:Item,[(608,337)(583,337)(583,398)(552,398)])
link(X,3616874:Count,[])
link(Y,8586974:Var1,[(622,341)])
}
Add(Bitmap,11314097,455,357)
{
HWidth=144
FillColor=16777215
Point(doCreate)
Point(onCreate)
Point(HHeight)
link(onCreate,3499814:doFor,[])
}
Add(ArrayRW,3753005,406,308)
{
link(Array,7577862:Var1,[(412,299)])
}
Add(Img_Loader,3773929,322,322)
{
link(onLoad,15235587:doResize,[])
}
Add(FileSearch,15102426,280,322)
{
Ext="*.bmp"
Dir="c:\windows\"
link(onSearch,3773929:doLoad,[])
link(onEndSearch,5365327:doCalc,[(317,335)(317,377)])
}
Add(Resize,15235587,364,322)
{
Width=48
Height=48
link(onResult,3753005:doAdd,[])
}
Add(For,3499814,497,357)
{
link(onEvent,12794161:doRead,[])
link(onStop,5485273:doLoad,[(535,370)(535,433)])
link(End,3342698:Var3,[(510,348)])
}
Add(MathParse,5365327,413,371)
{
DataCount=1
MathStr="%1 div 3 * 48"
link(onResult,11314097:doCreate,[])
link(X1,3342698:Var1,[(419,348)])
}
Add(GetDataEx,3342698,448,343)
{
link(Data,13690688:Count,[])
}
Add(ArrayRW,12794161,546,357)
{
link(onRead,13429568:doDraw,[])
link(Array,7577862:Var3,[(552,299)])
}
Add(GetDataEx,7577862,441,294)
{
link(Data,13690688:Array,[])
}
Add(CounterEx,3616874,609,294)
{
Max=96
Step=48
Point(onThroughMax)
link(onThroughMax,7428319:doOperation,[])
}
Add(Math,7428319,651,301)
{
Op2=48
link(Op1,8586974:Var3,[(657,292)(691,292)(691,341)])
}
Add(GetDataEx,8586974,651,336)
{
link(Data,7428319:Result,[])
}
Add(GetDataEx,8231436,581,406)
{
Angle=3
link(Data,11314097:Bitmap,[(461,411)])
}
Add(Image,5485273,581,427)
{
Top=5
Width=290
Height=373
AutoSize=0
ViewStyle=4
link(Bitmap,8231436:Var2,[])
}
карма: 11

0