Вверх ↑
Ответов: 1536
Рейтинг: 176
#1: 2015-08-01 14:33:39 ЛС | профиль | цитата
Вот схема:
code_36095.txt
Что-то мне подсказывает, что есть способ проще, с меньшим количеством компонентов. Задача очень простая, нужно удалить слова в скобках вместе со скобками.
------------ Дoбавленo в 14.33:
Немного неудачный пример дал, строки без кавычек игнорирует. Вот как должно быть:
Add(MainForm,2953706,154,210)
{
Width=349
Height=284
}
Add(StrPart,14879185,441,189)
{
Char="["
Point(Left)
link(onSplit,9704093:doSplit,[])
}
Add(StrPart,9704093,490,189)
{
Char="]"
Point(Right)
}
Add(Button,4128064,154,147)
{
Left=107
Top=114
link(onClick,5022087:doEvent1,[])
}
Add(StrCat,973729,441,245)
{
link(onStrCat,12374522:doCompare,[])
link(Str1,14879185:Left,[])
link(Str2,9704093:Right,[(454,233)(496,233)])
}
Add(Hub,14381452,406,238)
{
link(onEvent1,14879185:doSplit,[(429,244)(429,195)])
link(onEvent2,973729:doStrCat,[])
}
Add(Memo,6182383,238,168)
{
Left=32
Top=20
Width=262
Height=89
Strings=#31:[слово1] слово2 [слово3] слово4|29:слава1 слава2 [слава3] слава4|29:слива1 [слива2] слива3 слива4|31:слева1 слева2 [слева3] [слева4]|27:слева1 слева2 слева3 слева4|0:|
}
Add(ArrayEnum,12501373,252,231)
{
link(onItem,9880852:doCompare,[])
link(Array,6182383:Array,[])
}
Add(Memo,819974,623,245)
{
Left=32
Top=141
Width=262
Height=95
}
Add(Hub,5022087,203,147)
{
link(onEvent1,819974:doClear,[(611,153)(611,258)])
link(onEvent2,12501373:doEnum,[(226,160)(226,237)])
}
Add(StrMask,12374522,490,245)
{
Mask="*[*]*"
link(onFalse,4300464:doTrim,[])
link(onTrue,1801574:doWork3,[(536,258)(536,286)(389,286)])
}
Add(HubEx,1801574,385,238)
{
link(onEvent,14381452:doEvent1,[])
}
Add(Trim,4300464,546,245)
{
Mode=7
link(onTrim,6115476:doWork2,[])
}
Add(StrMask,9880852,294,231)
{
Mask="*[*"
link(onFalse,1767196:doCompare,[(334,237)(334,209)])
link(onTrue,1801574:doWork2,[])
}
Add(StrMask,1767196,343,203)
{
Mask="*]*"
link(onFalse,6115476:doWork1,[(389,209)(389,173)(599,173)])
link(onTrue,1801574:doWork1,[(389,216)])
}
Add(HubEx,6115476,595,245)
{
link(onEvent,819974:doAdd,[])
}
карма: 1
Не так страшна ошибка, как опасность её не заметить.

0
файлы: 1code_36095.txt [1.3KB] [408]