#sha
Add(MainForm,2953706,154,168)
{
}
Add(ODialog,15998065,371,182)
{
 StartDir=""
 FileName=""
 Point(doStartDir)
 link(onExecute,3375186:doText,[])
}
Add(Button,3451670,217,182)
{
 Left=5
 Top=30
 link(onClick,2881172:doData,[])
}
Add(Label,3375186,427,182)
{
 Left=65
 Top=30
}
Add(DoData,2881172,266,182)
{
 Data=String(C:Program Files;имя файла)
 link(onEventData,4470807:doSplit,[])
}
Add(StrPart,4470807,315,182)
{
 Char=";"
 link(onSplit,15998065:doExecute,[])
 link(onPart,15998065:doStartDir,[])
}