Add(MainForm,2953706,21,105)
{
}
Add(Memo,1638275,287,56)
{
 Top=40
 Width=384
 Height=221
 Align=5
 Strings=#130:Доброго дня всем.Подскажите пожалуйста кто знает.Возможно ли сделать удаление строк по маске.Думал легко справлюсь а что-то затык.|9:Например:|18:Москва бла-бла-бла|16:Рига бла-бла-бла|21:Ленинград бла-бла-бла|18:Москва бла-бла-бла|16:Рига бла-бла-бла|40:Строки Москва удалить остальные оставить|
}
Add(StrMask,4053873,259,168)
{
 Point(doMask)
 link(onTrue,10223121:doData,[])
}
Add(ArrayEnum,14754293,301,112)
{
 link(onItem,4053873:doCompare,[(349,118)(349,160)(249,160)(249,174)])
 link(Array,1638275:Array,[])
}
Add(DoData,10223121,308,175)
{
 link(onEventData,3349208:In,[])
 link(Data,14754293:Index,[])
}
Add(Hub,13026352,161,105)
{
 InCount=2
 link(onEvent1,8703861:doData,[(186,111)(186,181)])
 link(onEvent2,14754293:doEnum,[])
}
Add(Label,8606382,21,154)
{
 Width=384
 Height=40
 Align=2
 Caption=""
 AutoSize=1
}
Add(Button,8723097,105,112)
{
 Left=255
 Top=10
 Caption="Del"
 link(onClick,13026352:doEvent2,[])
}
Add(Edit,10925434,196,126)
{
 Left=15
 Top=10
 Width=225
 Hint=" - Маска для сравнения со строкой (* - любые символы, ? - один любой символ, # - одна любая цифра)"
 Text="*Москва*"
 ClearAfterEnter=1
 link(onEnter,13026352:doEvent1,[(235,139)(235,97)(151,97)(151,111)])
}
Add(DoData,8703861,196,175)
{
 link(onEventData,4053873:doMask,[])
 link(Data,10925434:Text,[])
}
Add(LineBreak,5798107,238,70)
{
 link(Out,1638275:doDelete,[])
 Primary=[3349208,112,105]
}