TheRenat, вот о чём рассказал sla8a:
![](/img/icon_plus.gif) Расшифровка
Add(MainForm,2953706,154,63) { Height=207 Caption="Кадры в потоке" Point(onClose) link(onCreate,4713873:doString,[]) link(onClose,15572565:doClose,[]) } Add(Button,16623408,154,112) { Left=5 Top=5 Caption="зАПИСЬ" link(onClick,14671224:doTimer,[(228,118)(228,146)]) } Add(Button,2494576,154,147) { Left=5 Top=40 Caption="СТОП" Data=Integer(0) link(onClick,5768717:doEvent1,[]) } Add(ScreenShort,15586006,280,140) { link(onCapture,2159317:doResize,[]) link(Handle,707359:Value,[]) } Add(Resize,2159317,322,140) { Width=276 Height=154 Point(Result) link(onResult,14889001:doWrite,[]) } Add(Memory,707359,280,98) { Default=Integer(0) } Add(BitmapStream,14889001,378,133) { link(Stream,1907847:Var2,[]) } Add(FileStream,15572565,378,77) { Mode=2 Point(doPosition) } Add(Image,14300608,280,224) { Left=95 Top=10 Width=280 Height=145 } Add(BitmapStream,4382578,238,224) { link(onRead,14300608:doLoad,[]) link(Stream,1907847:Var1,[(244,215)(370,215)(370,124)]) } Add(GetDataEx,1907847,378,119) { link(Data,15572565:Stream,[]) } Add(Timer,14671224,238,140) { Interval=100 Enable=1 AutoStop=100 link(onTimer,15586006:doCapture,[]) } Add(Button,9653819,154,224) { Left=5 Top=110 Caption="КАДР" link(onClick,4382578:doRead,[]) } Add(Hub,5768717,203,147) { link(onEvent1,14671224:doStop,[]) link(onEvent2,411923:doWork1,[(228,160)]) } Add(Dir,11747645,203,35) { } Add(FormatStr,4713873,203,77) { DataCount=1 Mask="%1\MyPict.stream" link(onFString,15572565:doOpen,[]) link(Str1,11747645:CurrentDir,[]) } Add(Button,12922399,154,189) { Left=5 Top=70 Caption="НАЧАЛО" Data=Integer(0) link(onClick,411923:doWork2,[]) } Add(HubEx,411923,224,188) { link(onEvent,15572565:doPosition,[(361,194)(361,97)]) }
10 секунд, 100 кадров и возможность просмотра
|