ashkalov писал(а):
перезалей А вот и не заливается, блин, пойду на Яндекс, облачный диск на халяву дают

------------ Дoбавленo в 21.54:
Add(MainForm,2953706,602,63)
{
Width=685
Height=351
link(onCreate,13368101:doCreate,[(642,83)(642,34)])
}
Add(ImageLoader,4434340,413,56)
{
DrawSource=2
link(onLoad,4434340:doDraw,[(449,62)(449,48)(401,48)(401,69)])
link(onDraw,7766277:doWork2,[])
}
Add(HubEx,16714778,385,56)
{
link(onEvent,4434340:doLoad,[])
}
Add(ClipboardHook,92140,413,112)
{
link(onBitmap,7766277:doWork3,[(459,125)])
}
Add(ODialog,5049552,308,56)
{
Filter="*"
FileName=""
Select=1
link(onExecute,16714778:doWork2,[])
}
Add(Button,53888,266,56)
{
Left=15
Top=265
Width=75
Height=25
Font=[Arial,8,0,0,1]
TabOrder=-1
Caption="Open"
link(onClick,5049552:doExecute,[])
}
Add(DropFile,97222,350,21)
{
link(onDropFile,16714778:doWork1,[(389,27)])
}
Add(Image,85720,504,63)
{
Left=5
Top=5
Width=320
Height=240
Color=12639424
Point(ImageWidth)
Point(ImageHeight)
}
Add(ScrollBar,3767771,266,168)
{
Left=380
Top=280
Width=200
Max=255
Position=128
ScrollMode=1
link(onPosition,2609585:doCalc,[])
}
Add(HubEx,7766277,455,63)
{
link(onEvent,11886331:doEvent1,[])
}
Add(Image,2833265,770,203)
{
Left=335
Top=5
Width=320
Height=240
Color=15780518
link(Bitmap,8309051:Var2,[])
}
Add(Button,14229856,266,14)
{
Left=595
Top=275
Caption="Yes!"
link(onClick,10055245:doData,[])
}
Add(For,9386032,455,168)
{
IncludeEnd=1
link(onEvent,13055987:doFor,[])
link(onStop,2833265:doLoad,[(495,181)(495,209)])
link(End,718564:Var2,[(468,132)(517,132)])
}
Add(For,13055987,511,168)
{
IncludeEnd=1
link(onEvent,14666566:doGetPixel,[])
link(End,8717990:Var2,[])
}
Add(Img_GetPoint,14666566,560,168)
{
link(onGetPixel,1155705:doGetRGB,[])
link(Bitmap,598437:Var2,[])
link(X,2741147:Var2,[])
link(Y,1769588:Var2,[])
}
Add(ToRGB,1155705,609,168)
{
link(onResult,6161928:doCalc,[])
}
Add(Math,6420317,378,168)
{
OpType=3
Op2=128
link(onResult,9386032:doFor,[])
link(Op1,3767771:Position,[(384,158)(314,158)(314,212)(272,212)])
}
Add(Math,12375106,623,273)
{
OpType=2
ResultType=0
link(onResult,1899266:doCompare,[])
link(Op1,13425659:Var2,[])
link(Op2,8594737:Var3,[(636,222)])
}
Add(If_else,1899266,665,273)
{
Type=1
Op2=Integer(255)
link(onTrue,16287829:doValue,[])
link(onFalse,16287829:doClear,[])
}
Add(Memory,16287829,714,273)
{
Default=Integer(255)
link(onData,421639:doOperation,[(756,279)(756,311)(611,311)(611,328)])
}
Add(Math,421639,623,322)
{
OpType=2
ResultType=0
link(onResult,11964020:doCompare,[])
link(Op1,7628031:Var2,[(629,282)(622,282)])
link(Op2,7521742:Var3,[(636,313)])
}
Add(If_else,11964020,665,322)
{
Type=1
Op2=Integer(255)
link(onTrue,5116251:doValue,[])
link(onFalse,5116251:doClear,[])
}
Add(Memory,5116251,714,322)
{
Default=Integer(255)
link(onData,10431664:doOperation,[(758,328)(758,363)(611,363)(611,377)])
}
Add(Math,10431664,623,371)
{
OpType=2
ResultType=0
link(onResult,3917180:doCompare,[])
link(Op1,16220308:Var2,[(629,331)(615,331)])
link(Op2,7521742:Var2,[(636,360)(608,360)])
}
Add(If_else,3917180,665,371)
{
Type=1
Op2=Integer(255)
link(onTrue,14721583:doValue,[])
link(onFalse,14721583:doClear,[])
}
Add(Memory,14721583,714,371)
{
Default=Integer(255)
link(onData,10522818:doRGB,[])
}
Add(GetDataEx,8594737,602,217)
{
Angle=3
link(Data,6420317:Result,[(384,222)])
}
Add(GetDataEx,7521742,602,308)
{
link(Data,8594737:Var2,[])
}
Add(RGB,10522818,770,371)
{
link(onRGB,6980058:doWork2,[])
link(G,5116251:Value,[(783,359)(720,359)])
link(B,16287829:Value,[(790,316)(720,316)])
}
Add(Hub,11886331,469,63)
{
OutCount=3
link(onEvent1,85720:doLoad,[])
link(onEvent2,16310176:doEvent1,[(493,76)(493,20)])
link(onEvent3,5789101:doCreate,[(493,83)(493,118)])
}
Add(Img_Point,12872541,826,175)
{
Point(X)
Point(Y)
Point(Color)
link(Bitmap,8309051:Var3,[(832,136)])
link(X,2741147:Var3,[(839,149)])
link(Y,1769588:Var3,[(846,144)])
}
Add(GetDataEx,2741147,567,144)
{
Angle=3
link(Data,9386032:Position,[(553,149)(553,213)(461,213)])
}
Add(GetDataEx,1769588,574,139)
{
Angle=3
link(Data,13055987:Position,[(547,144)(547,203)(517,203)])
}
Add(Bitmap,5789101,770,98)
{
Point(HWidth)
Point(HHeight)
Point(doCreate)
link(HWidth,718564:Var3,[(776,88)(763,88)(763,110)])
link(HHeight,8717990:Var3,[(783,84)(758,84)(758,103)])
}
Add(GetDataEx,8309051,770,131)
{
link(Data,5789101:Bitmap,[])
}
Add(GetDataEx,718564,511,105)
{
link(Data,85720:ImageWidth,[])
}
Add(GetDataEx,8717990,518,98)
{
link(Data,85720:ImageHeight,[])
}
Add(If_else,8154642,553,273)
{
Op2=Integer(0)
link(onTrue,12375106:doOperation,[])
link(onFalse,1014337:doCompare,[(595,286)(595,316)(253,316)(253,286)])
link(Op1,16471770:Selected,[(559,266)(546,266)(546,311)(510,311)])
}
Add(If_else,7550904,462,329)
{
Type=1
Op2=Integer(255)
link(onTrue,9354052:doValue,[])
link(onFalse,9354052:doClear,[])
}
Add(Memory,9354052,511,329)
{
Default=Integer(255)
link(onData,4270501:doCompare,[(557,335)(557,365)(250,365)(250,398)])
}
Add(If_else,14479406,462,378)
{
Type=1
Op2=Integer(255)
link(onTrue,2072299:doValue,[])
link(onFalse,2072299:doClear,[])
}
Add(Memory,2072299,511,378)
{
Default=Integer(255)
link(onData,343928:doCompare,[(550,384)(550,463)(253,463)(253,496)])
}
Add(If_else,5574525,462,476)
{
Type=1
Op2=Integer(255)
link(onTrue,15588707:doValue,[])
link(onFalse,15588707:doClear,[])
}
Add(Memory,15588707,511,476)
{
Default=Integer(255)
link(onData,11202881:doRGB,[(559,482)(559,440)])
}
Add(Bitmap,13368101,651,14)
{
HWidth=1
HHeight=1
Point(doCreate)
}
Add(Resize,3152193,602,14)
{
Width=1
Height=1
link(onResult,13368101:doLoad,[])
link(Bitmap,598437:Var1,[(608,7)(566,7)])
}
Add(GetDataEx,598437,560,132)
{
Angle=3
link(Data,14127836:Var2,[(510,137)])
}
Add(Hub,16310176,574,14)
{
OutCount=3
link(onEvent1,3152193:doResize,[])
link(onEvent3,10230683:doGetPixel,[(593,34)(593,62)])
}
Add(Img_GetPoint,10230683,651,56)
{
link(onGetPixel,5584355:doGetRGB,[(694,62)(694,41)])
link(Bitmap,13368101:Bitmap,[])
}
Add(ToRGB,5584355,700,35)
{
link(onResult,16497987:doCalc,[])
}
Add(RGB,11202881,574,434)
{
link(onRGB,6980058:doWork3,[(814,440)])
link(G,2072299:Value,[(587,419)(517,419)])
link(B,9354052:Value,[(594,370)(517,370)])
}
Add(HubEx,6980058,810,371)
{
Angle=3
link(onEvent,12872541:doDraw,[(814,181)])
}
Add(RadioButton,11869215,455,273)
{
Left=275
Top=260
Width=75
Selected=0
Caption="Яркость"
}
Add(RadioButton,16471770,504,273)
{
Left=275
Top=285
Width=95
Caption="Контрастность"
}
Add(GetDataEx,16220308,609,252)
{
link(Data,1155705:R,[])
}
Add(GetDataEx,7628031,616,245)
{
link(Data,1155705:G,[])
}
Add(GetDataEx,13425659,623,238)
{
link(Data,1155705:B,[])
}
Add(MathParse,16497987,749,35)
{
DataCount=3
MathStr="(%1 + %2 + %3)/3"
link(X1,5584355:R,[(755,27)(745,27)(745,83)(706,83)])
link(X2,5584355:G,[(762,23)(740,23)(740,78)(713,78)])
link(X3,5584355:B,[(769,18)(736,18)(736,73)(720,73)])
}
Add(If_else,1014337,266,280)
{
Type=2
link(onTrue,14484550:doOperation,[])
link(onFalse,3887843:doOperation,[(305,293)(305,335)])
link(Op1,7028358:Var1,[(272,250)])
link(Op2,4528581:Var1,[(279,263)])
}
Add(Math,14484550,357,280)
{
OpType=2
ResultType=0
link(onResult,3636049:doWork1,[(410,286)])
link(Op1,6590945:Var3,[(363,271)])
link(Op2,12933997:Var1,[(370,271)])
}
Add(Math,3887843,357,329)
{
OpType=3
ResultType=0
link(onResult,3636049:doWork2,[])
link(Op1,6590945:Var2,[(363,320)(349,320)])
link(Op2,15307334:Var1,[(370,320)])
}
Add(If_else,4270501,266,392)
{
Type=2
link(onTrue,4862381:doOperation,[(303,398)(303,384)])
link(onFalse,6207510:doOperation,[(303,405)(303,433)])
link(Op1,2220770:Var1,[(272,369)])
link(Op2,4950250:Var1,[(279,376)])
}
Add(Math,4862381,357,378)
{
OpType=2
ResultType=0
link(onResult,9843527:doWork2,[])
link(Op1,4382125:Var3,[(363,369)])
link(Op2,8236767:Var1,[(370,369)])
}
Add(Math,6207510,357,427)
{
OpType=3
ResultType=0
link(onResult,9843527:doWork3,[(410,433)])
link(Op1,4382125:Var2,[(363,417)(342,417)])
link(Op2,10102159:Var1,[(370,418)])
}
Add(If_else,343928,266,490)
{
Type=2
link(onTrue,7125254:doOperation,[(304,496)(304,482)])
link(onFalse,16306177:doOperation,[(303,503)(303,531)])
link(Op1,2220770:Var2,[(272,473)(321,473)])
link(Op2,4950250:Var2,[(279,478)(328,478)])
}
Add(Math,7125254,357,476)
{
OpType=2
ResultType=0
link(onResult,4997972:doWork2,[])
link(Op1,3510844:Var3,[(363,467)])
link(Op2,1921855:Var1,[(370,467)])
}
Add(Math,16306177,357,525)
{
OpType=3
ResultType=0
link(onResult,4997972:doWork3,[(410,531)])
link(Op1,3510844:Var2,[(363,518)(335,518)])
link(Op2,1921855:Var2,[(370,518)(398,518)])
}
Add(GetDataEx,1921855,392,462)
{
link(Data,10102159:Var2,[])
}
Add(GetDataEx,10102159,392,413)
{
link(Data,8236767:Var2,[])
}
Add(GetDataEx,8236767,392,364)
{
link(Data,15307334:Var2,[])
}
Add(GetDataEx,15307334,392,315)
{
link(Data,12933997:Var2,[])
}
Add(GetDataEx,12933997,392,266)
{
link(Data,2609585:Result,[(398,236)(335,236)])
}
Add(GetDataEx,6590945,343,266)
{
link(Data,13425659:Var1,[(349,243)])
}
Add(GetDataEx,4382125,336,364)
{
link(Data,7628031:Var1,[(342,250)])
}
Add(GetDataEx,3510844,329,462)
{
link(Data,16220308:Var1,[(335,257)])
}
Add(GetDataEx,4950250,322,371)
{
link(Data,4528581:Var2,[])
}
Add(GetDataEx,4528581,322,258)
{
Angle=1
link(Data,16497987:Result,[(755,263)])
}
Add(HubEx,3636049,406,329)
{
link(onEvent,7550904:doCompare,[])
}
Add(HubEx,4997972,406,476)
{
link(onEvent,5574525:doCompare,[])
}
Add(HubEx,9843527,406,378)
{
link(onEvent,14479406:doCompare,[])
}
Add(MathParse,6161928,665,168)
{
DataCount=3
MathStr="(%1 + %2 + %3)/3"
link(onResult,8154642:doCompare,[(708,174)(708,237)(541,237)(541,279)])
link(X1,16220308:Var3,[(671,160)(658,160)(658,257)])
link(X2,7628031:Var3,[(678,156)(652,156)(652,250)])
link(X3,13425659:Var3,[(685,152)(645,152)(645,243)])
}
Add(GetDataEx,2220770,315,364)
{
link(Data,7028358:Var2,[])
}
Add(GetDataEx,7028358,315,245)
{
link(Data,6161928:Result,[(321,229)(671,229)])
}
Add(MathParse,2609585,329,168)
{
DataCount=1
MathStr="(%1+1000)/1128"
link(onResult,6420317:doOperation,[])
}
Add(DoData,10055245,308,14)
{
link(onEventData,7766277:doWork1,[(459,20)])
link(Data,8309051:Var1,[(314,2)(688,2)(688,136)])
}
Add(Button,1326377,266,119)
{
Left=115
Top=270
Caption="Save"
link(onClick,10793361:doExecute,[])
}
Add(PictureStream,5330589,350,112)
{
link(Bitmap,14127836:Var1,[(363,103)])
}
Add(SDialog,10793361,308,119)
{
link(onExecute,5330589:doSave,[])
}
Add(GetDataEx,14127836,504,98)
{
link(Data,85720:ImageBitmap,[])
}
Опять картинками Гигабайты съели!