Add(MainForm,7868431,49,105)
{
 Left=20
 Top=105
 Width=260
 Height=96
 Caption="Удаление exe - файлов"
 BorderStyle=3
 link(onCreate,9557961:doBrowse,[])
}
Add(FileSearch,3901098,161,119)
{
 Ext="*.sha"
 link(onSearch,8922977:doReplace,[])
}
Add(Browse,9557961,98,119)
{
 Title="Путь к папке со схемами SHA"
 link(onBrowse,3901098:doSearch,[])
 link(onCancel,7868431:doClose,[(144,132)(144,161)(37,161)(37,132)])
}
Add(Label,8481983,273,147)
{
 Left=65
 Top=15
 Width=127
 Height=33
 Font=[MS Sans Serif,18,1,255,1]
 Caption="ГОТОВО !"
}
Add(DirTools,6213315,269,105)
{
 FilesOnly=1
 NoConfirmation=1
 NoErrorUI=1
 Silent=1
 SimpleProgress=1
 Point(doExists)
}
Add(Replace,8922977,210,119)
{
 SubStr=".sha"
 DestStr=".exe"
 link(onReplace,6213315:doDelete,[])
}