Вверх ↑
Ответов: 1535
Рейтинг: 176
#1: 2013-09-07 12:44:09 ЛС | профиль | цитата
Леонид писал(а):
Проще да, а производительней нет

Не понял тебя.
idstr.jpg
Add(RichEdit,16605657,259,28)
{
Left=5
Top=5
Width=285
Height=222
ScrollBars=2
Point(Position)
Point(onMouseUp)
Point(FileName)
link(onMouseUp,9072109:doEvent1,[(303,41)(303,104)(9,104)(9,167)])
}
Add(Str_Enum,2922802,259,168)
{
Delimiter=""
Point(doFrom)
link(onEnum,3739855:doConvert,[])
link(onEndEnum,16505171:doStop,[(303,181)(303,233)(102,233)(102,174)])
link(String,7104611:Var2,[])
}
Add(Convertor,3739855,315,168)
{
Mode=3
link(onResult,16324632:doCompare,[])
}
Add(If_else,16324632,357,168)
{
Op2=Integer(13)
link(onTrue,143657:doEvent1,[])
}
Add(Hub,5155164,217,161)
{
link(onEvent1,4168281:doEvent1,[(242,167)(242,160)(331,160)(331,118)])
link(onEvent2,2922802:doEnum,[])
}
Add(Copy,15920253,644,238)
{
link(onCopy,14510567:doText,[])
link(Str,7104611:Var3,[(650,145)])
link(Position,537073:Var3,[(657,222)])
}
Add(MemFifo,4285532,595,175)
{
Default=Integer(0)
Point(Data)
link(Data,316372:Var3,[(601,152)])
}
Add(If_else,3954745,497,175)
{
Type=3
Op2=Integer(0)
link(onTrue,3818584:doWork2,[])
link(onFalse,3173821:doEvent1,[])
link(Op1,316372:Var2,[])
link(Op2,97585:Result,[(510,138)(552,138)])
}
Add(Hub,3173821,546,182)
{
OutCount=3
link(onEvent1,3818584:doWork3,[(571,188)])
link(onEvent2,1350772:doCalc,[(585,195)(585,244)])
link(onEvent3,2922802:doStop,[(565,202)(565,219)(247,219)(247,181)])
}
Add(HubEx,3818584,567,175)
{
link(onEvent,4285532:doValue,[])
}
Add(MathParse,1350772,595,238)
{
MathStr="%1 - %2"
ResultType=0
link(onResult,15920253:doCopy,[])
link(X1,4285532:Value1,[])
link(X2,537073:Var2,[])
}
Add(GetDataEx,7104611,259,140)
{
link(Data,16605657:Text,[])
}
Add(GetDataEx,316372,497,147)
{
Angle=3
link(Data,2922802:NumSubStr,[(398,152)(398,208)(265,208)])
}
Add(GetDataEx,537073,602,217)
{
link(Data,4285532:Value2,[])
}
Add(Counter,2706752,497,98)
{
Max=999999999
link(onNext,97585:doOperation,[])
}
Add(Math,97585,546,98)
{
link(Op1,14352556:Var3,[(552,82)])
}
Add(Hub,143657,406,168)
{
link(onEvent1,2706752:doNext,[(428,174)(428,104)])
link(onEvent2,3954745:doCompare,[])
}
Add(Hub,4168281,469,112)
{
link(onEvent1,2706752:doReset,[])
link(onEvent2,4285532:doClear,[(490,125)(490,159)(583,159)(583,188)])
}
Add(MainForm,2953706,98,14)
{
Width=629
Height=278
link(onCreate,10679631:doFor,[])
}
Add(Edit,5298288,490,273)
{
Left=305
Top=65
Width=290
Text=""
ClearAfterEnter=1
link(onChange,8729519:doStop,[(536,279)(536,333)(226,333)(226,286)])
link(Str,8729519:Part,[(496,259)(478,259)(478,323)(244,323)])
}
Add(Str_Enum,8729519,231,273)
{
Delimiter="
"
link(onEnum,14199495:doLength,[])
link(onEndEnum,1691853:doEvent1,[])
link(String,7104611:Var1,[(237,145)])
}
Add(If_else,8738010,434,273)
{
Type=4
link(onTrue,5298288:doText,[])
link(Op2,14352556:Var2,[])
}
Add(Length,14199495,329,273)
{
link(onLength,13773146:doOperation,[])
}
Add(Math,13773146,385,273)
{
Point(doClear)
link(onResult,8738010:doCompare,[])
link(Op1,13773146:Result,[(391,261)(379,261)(379,317)(391,317)])
}
Add(Edit,14510567,693,238)
{
Left=305
Top=150
Width=291
Text=""
}
Add(Label,9674154,161,168)
{
Left=375
Top=125
}
Add(TimeCounter,16505171,112,161)
{
Precision=1
link(onStart,5155164:doEvent1,[])
link(onStop,9674154:doText,[])
}
Add(TimeCounter,1585188,112,273)
{
Precision=1
link(onStart,8729519:doEnum,[])
link(onStop,650494:doText,[])
}
Add(Hub,1691853,287,280)
{
link(onEvent1,13773146:doClear,[])
link(onEvent2,1585188:doStop,[(315,293)(315,318)(87,318)(87,286)])
}
Add(Label,650494,168,280)
{
Left=375
Top=40
}
Add(Label,12052074,42,7)
{
Left=305
Top=40
Width=56
Height=17
Caption="ser_davkin"
}
Add(Label,10269639,49,14)
{
Left=305
Top=125
Width=42
Height=17
Caption="Леонид"
}
Add(Hub,9072109,28,161)
{
link(onEvent1,16505171:doStart,[])
link(onEvent2,1585188:doStart,[(87,174)(87,279)])
}
Add(For,10679631,147,28)
{
End=1000
link(onEvent,6660462:doStrCat,[])
}
Add(StrCat,6660462,203,28)
{
Str2="-ая условная строка"
link(onStrCat,16605657:doAdd,[])
}
Add(GetDataEx,14352556,441,77)
{
Angle=3
link(Data,16605657:Position,[(286,82)])
}
карма: 1
Не так страшна ошибка, как опасность её не заметить.

0
файлы: 1idstr.jpg [131KB] [480]