Add(MainForm,3211311,168,147)
{
 Width=285
 Height=584
 Position=1
}
Add(SearchInFile,993512,308,301)
{
 FileName="1.txt"
 Sensitive=1
 Point(String)
 link(onNotSearch,13927566:doEnum,[])
}
Add(Button,12793547,196,301)
{
 Left=10
 Top=250
 Caption="Так"
 link(onClick,15060268:doExecute,[])
}
Add(Edit,5282391,399,56)
{
 Left=10
 Top=15
 Width=245
 Text="своих"
}
Add(StrList,1946260,273,77)
{
 FileName="1.txt"
 Strings=#26:Небрежный плод моих забав,|30:Бессонниц, легких вдохновений,|23:Незрелых и увядших лет,|23:Ума холодных наблюдений|25:И сердца горестных замет.|25:Так думал молодой повеса,|24:Летя в пыли на почтовых,|22:Всевышней волею Зевеса|28:Наследник всех своих родных.|
 Point(doSave)
}
Add(Button,11561342,224,140)
{
 Left=15
 Top=495
 Caption="Или так"
 link(onClick,10137797:doEnum,[])
}
Add(ArrayEnum,10137797,287,140)
{
 link(onItem,16313034:doEnum,[])
 link(Array,1946260:Array,[])
}
Add(Str_Enum,16313034,343,140)
{
 Delimiter=" "
 link(onEnum,15474315:doCompare,[])
}
Add(If_else,15474315,392,140)
{
 link(onTrue,8420484:doAdd,[])
 link(Op2,9735585:Var2,[])
}
Add(ODialog,15060268,259,301)
{
 link(onExecute,993512:doSearch,[])
}
Add(Str_Enum,13927566,371,301)
{
 Delimiter=" "
 link(onEnum,5631536:doCompare,[])
}
Add(If_else,5631536,427,301)
{
 link(onTrue,852769:doAdd,[])
 link(Op1,9735585:Var3,[(433,103)])
}
Add(GetDataEx,9735585,399,98)
{
 link(Data,5282391:Text,[])
}
Add(Memo,8420484,497,140)
{
 Left=10
 Top=275
 Width=245
 Height=205
 Ctl3D=1
 ScrollBars=3
 link(Str,10137797:Item,[(503,131)(489,131)(489,180)(293,180)])
}
Add(Memo,852769,490,301)
{
 Left=10
 Top=45
 Width=245
 Height=205
 Ctl3D=1
 ScrollBars=3
 link(Str,993512:String,[(496,292)(482,292)(482,341)(314,341)])
}