Add(MainForm,2953706,49,133)
{
}
Add(DirTools,5886547,399,112)
{
 Point(doGetSize)
 link(onOK,7557319:doString,[])
}
Add(Button,9202113,175,133)
{
 Width=384
 Height=30
 Align=2
 Caption="Найти пустые папки в каталоге"
 link(onClick,7877589:doBrowse,[])
}
Add(Browse,7877589,224,133)
{
 link(onBrowse,14184120:doSearch,[])
}
Add(FileSearch,14184120,280,133)
{
 Include=1
 link(onSearch,5618083:doValue,[])
}
Add(FormatStr,7557319,469,112)
{
 Mask="%1;%2"
 link(onFString,12623990:doAdd,[])
 link(Str1,5618083:Value,[(475,103)(461,103)(461,173)(342,173)])
}
Add(StringTable,12623990,546,112)
{
 Left=550
 Top=105
 Align=5
 Columns=#13:Имя папки=300|6:Размер|
}
Add(Memory,5618083,336,133)
{
 link(onData,5886547:doGetSize,[])
}