Вверх ↑
Ответов: 1376
Рейтинг: 197
#1: 2012-05-03 23:31:42 ЛС | профиль | цитата
Andrey,
code_27810.txt
Так?
Ещё вариант

Add(Edit,8965819,406,133)
{
Left=45
Top=5
Width=90
Text=""
link(onChange,13810589:doEvent1,[])
}
Add(MultiReplace,7053660,497,133)
{
ReplaceList="\ =_;
/=_;
:=_;
*=_;
?=_;
"=_;
<=_;
>=_;
|=_;"
}
Add(Hub,13810589,455,133)
{
link(onEvent1,7053660:doMultiReplace,[])
link(onEvent2,994396:doCompare,[(482,146)(482,195)])
}
Add(If_else,994396,490,189)
{
link(onTrue,191309:doWork2,[])
link(onFalse,10892584:doMessage,[])
link(Op2,6815649:Var2,[])
}
Add(Message,10892584,546,196)
{
Message="Недопустимый символ
/ : * ? " < > |"
Caption="Ошибка"
link(onMessage,1498150:doReplace,[])
}
Add(HubEx,191309,649,189)
{
Angle=3
link(onEvent,8965819:doText2,[(653,120)(394,120)(394,146)])
}
Add(Replace,1498150,602,196)
{
SubStr="_"
link(onReplace,191309:doWork3,[(653,202)])
link(Str,6815649:Var3,[(608,173)])
link(Dest,2626827:Text,[])
}
Add(GetDataEx,6815649,497,168)
{
link(Data,7053660:Result,[])
}
Add(VisualStrings,2626827,616,161)
{
Width=11
}

карма: 1

1
файлы: 1code_27810.txt [1.2KB] [532]
Голосовали:Andrey