Add(MainForm,16177347,434,175)
{
 Left=20
 Top=105
 Width=454
 Height=173
}
Add(FileSearch,3747670,385,266)
{
 Ext=""
 link(onSearch,15837227:doValue,[])
 link(Ext,8086166:Text,[])
 link(Dir,16308736:Text,[])
}
Add(Button,8220690,294,217)
{
 Left=5
 Top=30
 Width=100
 Caption="Исходная папка"
 link(onClick,12011026:doBrowse,[])
}
Add(Browse,12011026,343,217)
{
 link(onBrowse,16308736:doText,[])
}
Add(Edit,8086166,385,175)
{
 Left=155
 Top=7
 Width=80
 Font=[MS Sans Serif,10,1,0,1]
 Text="*.sha"
}
Add(FilePart,14651460,483,266)
{
 ExtPoint=0
 link(onName,3601005:doString,[])
 link(onExt,12257562:doValue,[(540,286)(540,202)])
}
Add(Label,9067115,343,175)
{
 Left=5
 Top=10
 Width=146
 Height=17
 Caption="Маска выбираемых файлов"
}
Add(Edit,16308736,392,217)
{
 Left=110
 Top=30
 Width=330
 Text=""
}
Add(Button,14247948,497,217)
{
 Left=5
 Top=65
 Width=100
 Caption="Целевая папка"
 link(onClick,8644126:doBrowse,[])
}
Add(Edit,4656895,588,217)
{
 Left=110
 Top=65
 Width=330
 Text=""
}
Add(FileTools,2000193,581,322)
{
 link(FileName,15837227:Value,[(587,309)(440,309)])
 link(NewFileName,3601005:FString,[])
}
Add(Browse,8644126,546,217)
{
 NewStyle=0
 link(onBrowse,4656895:doText,[])
}
Add(Button,2060882,294,266)
{
 Left=5
 Top=110
 Caption="Copy"
 link(onClick,3747670:doSearch,[])
}
Add(FormatStr,3601005,588,273)
{
 DataCount=4
 Mask="%1/%2_%3%4"
 Point(FString)
 link(onFString,2000193:doCopy,[(639,279)(639,364)(560,364)(560,335)])
 link(Str1,4656895:Text,[])
 link(Str3,16426918:FormatTime,[(608,261)(629,261)])
 link(Str4,12257562:Value,[(615,265)(671,265)])
}
Add(Memory,15837227,434,266)
{
 link(onData,14651460:doPart,[])
}
Add(Time,16426918,623,217)
{
 Format="DMY"
}
Add(Memory,12257562,665,196)
{
}