Add(MainForm,16177347,147,14)
{
 Left=20
 Top=105
 Width=454
 Height=173
}
Add(FileSearch,3747670,98,105)
{
 Ext=""
 link(onSearch,15837227:doValue,[])
 link(Ext,8086166:Text,[])
 link(Dir,16308736:Text,[])
}
Add(Button,8220690,7,56)
{
 Left=5
 Top=30
 Width=100
 Caption="Исходная папка"
 link(onClick,12011026:doBrowse,[])
}
Add(Browse,12011026,56,56)
{
 link(onBrowse,16308736:doText,[])
}
Add(Edit,8086166,98,14)
{
 Left=155
 Top=7
 Width=80
 Font=[MS Sans Serif,10,1,0,1]
 Text="*.sha"
 Point(Text)
}
Add(FilePart,14651460,196,105)
{
 NameWOExt=1
 link(onName,3601005:doString,[])
}
Add(Label,9067115,56,14)
{
 Left=5
 Top=10
 Width=146
 Height=17
 Caption="Маска выбираемых файлов"
}
Add(Edit,16308736,105,56)
{
 Left=110
 Top=30
 Width=330
 Text=""
 Point(doText)
 Point(Text)
}
Add(Button,14247948,210,63)
{
 Left=5
 Top=65
 Width=100
 Caption="Целевая папка"
 link(onClick,8644126:doBrowse,[])
}
Add(Edit,4656895,301,63)
{
 Left=110
 Top=65
 Width=330
 Text=""
 Point(doText)
 Point(Text)
}
Add(FileTools,2000193,294,161)
{
 link(FileName,15837227:Value,[(300,149)(153,149)])
 link(NewFileName,3601005:FString,[])
}
Add(Browse,8644126,259,63)
{
 NewStyle=0
 link(onBrowse,4656895:doText,[])
}
Add(Button,2060882,7,105)
{
 Left=5
 Top=110
 Caption="Copy"
 link(onClick,3747670:doSearch,[])
}
Add(FormatStr,3601005,301,112)
{
 Mask="%1/%2"
 Point(FString)
 link(onFString,2000193:doCopy,[(352,118)(352,203)(273,203)(273,174)])
 link(Str1,4656895:Text,[])
}
Add(Memory,15837227,147,105)
{
 link(onData,14651460:doPart,[])
}