Add(MainForm,37125,14,35) { Left=20 Top=105 Width=377 Height=195 Caption="Копирование файлов с помощью FileStream" BorderStyle=3 Position=1 } Add(FileStream,9126190,441,84) { Mode=1 Point(doCopyFromStream) link(FileName,8018009:Text,[]) } Add(StreamCopy,3497766,336,189) { Count=1000 link(Dest,9126190:Stream,[(342,168)(447,168)]) link(Source,6674453:Stream,[]) link(Count,7196084:Text,[(356,178)(167,178)]) link(onCopy,9126190:doCopyFromStream,[(404,195)(404,104)]) } Add(Hub,10001394,280,189) { link(onEvent1,3497766:doCopy,[]) link(onEvent2,3334286:doWork1,[(326,202)]) } Add(Thread,16606372,161,189) { Delay=0 FastStop=0 link(onExec,6285456:doFor,[]) } Add(FileStream,6674453,343,98) { link(FileName,4997065:Text,[]) } Add(Edit,4997065,343,35) { Left=10 Top=20 Width=315 Text="Имя файла" link(onChange,2711294:doWork1,[]) } Add(Button,13364289,98,35) { Left=330 Top=20 Width=30 Hint="Выберите файл" Caption="..." link(onClick,772520:doExecute,[]) } Add(Edit,8018009,441,35) { Left=10 Top=60 Width=350 Text="Новое имя файла" } Add(ODialog,772520,161,35) { link(onExecute,981079:doEvent1,[]) } Add(Hub,981079,224,35) { OutCount=4 link(onEvent1,4997065:doText,[]) link(onEvent2,6674453:doOpen,[(323,48)(323,104)]) link(onEvent3,7754654:In,[(273,55)(273,69)]) link(onEvent4,14267965:doEnabled,[(265,62)(265,76)(86,76)(86,90)]) } Add(MultiElement,2711294,392,35) { @Hint=#32:Новое имя файла с префиксом New_| link(onEvent1,8018009:doText,[]) } BEGIN_SDK Add(EditMulti,15985795,21,21) { EventCount=1 WorkCount=1 link(doWork1,3305867:doEvent1,[(35,27)(35,111)]) } Add(StrCat,871027,175,56) { Str1="New_" link(onStrCat,12080695:doValue,[]) } Add(FilePart,4833415,105,49) { NameWOExt=1 link(onPath,7061556:doValue,[]) link(onName,871027:doStrCat,[]) } Add(StrCat,2123902,224,112) { link(onStrCat,15985795:onEvent1,[(309,118)(309,27)]) link(Str1,7061556:Value,[]) link(Str2,12080695:Value,[(237,104)(272,104)]) } Add(Memory,7061556,224,49) { } Add(Memory,12080695,266,56) { } Add(Hub,3305867,49,105) { link(onEvent1,4833415:doPart,[(93,111)(93,55)]) link(onEvent2,2123902:doStrCat,[]) } END_SDK Add(For,6285456,224,189) { Start=1 Step=1000 Point(doStep) link(onEvent,10001394:doEvent1,[]) link(onStop,10551021:doEvent1,[(265,202)(265,111)]) link(End,8758688:Var1,[(237,156)]) } Add(ProgressBar,14763115,336,252) { Left=10 Top=100 Width=350 Smooth=1 ProgressColor=8388608 Point(doMax) } Add(DoData,9748640,287,259) { link(onEventData,14763115:doMax,[]) link(Data,8758688:Var2,[]) } Add(GetDataEx,8758688,280,147) { Angle=1 link(Data,6674453:Size,[(356,156)]) } Add(Edit,7196084,161,133) { Left=10 Top=130 Text="1000" DataType=2 link(onChange,6285456:doStep,[(205,139)(205,209)]) } Add(Label,13011390,14,112) { Left=70 Top=135 Width=139 Height=17 Caption="Размер буфера в байтах" } Add(Button,14267965,98,84) { Left=230 Top=130 Width=130 Enabled=1 Caption="Копировать" Point(doEnabled) link(onClick,8200132:doEvent1,[]) } Add(Message,4711303,490,119) { Message="Копирование завершено." Caption="Сообщение" Point(onOK) link(onOK,2886157:In,[]) } Add(Hub,8200132,161,84) { link(onEvent1,9126190:doOpen,[]) link(onEvent2,16606372:doStart,[(205,97)(205,124)(148,124)(148,195)]) } Add(Hub,10551021,280,105) { OutCount=3 link(onEvent1,6674453:doClose,[]) link(onEvent2,9126190:doClose,[(394,118)(394,97)]) link(onEvent3,4711303:doMessage,[]) } Add(LineBreak,16123557,222,259) { Caption="max" link(Out,9748640:doData,[]) Primary=[7754654,65,-196] } Add(HubEx,3334286,322,231) { Angle=1 link(onEvent,14763115:doPosition,[(326,258)]) } Add(LineBreak,6025975,218,238) { Caption="clear" link(Out,3334286:doWork2,[]) Primary=[2886157,321,-112] }