Вверх ↑
Ответов: 9906
Рейтинг: 351
#1: 2013-06-13 19:38:58 ЛС | профиль | цитата
Ну для ТС я выложил бы чего попроще (и чуток с другими цифрами)....


Add(MainForm,955094,56,231)
{
Width=373
Height=494
Position=1
Point(onResize)
}
Add(ChildPanelEx,3753469,301,238)
{
Mode=1
}
BEGIN_SDK
Add(EditMultiEx,478117,21,21)
{
WorkCount=#5:##add|6:doText|7:##clear|
VarCount=#5:Width|
Width=188
Height=81
VOffset=14
Point(##add)
Point(##clear)
link(doText,5899882:doSplit,[])
link(Width,6802933:Width,[(27,89)(111,89)])
}
Add(Panel,7905297,154,35)
{
Width=365
Height=67
Align=2
Layout="parent.123"
Point(Width)
Point(doHeight)
}
Add(Label,6802933,98,49)
{
Left=2
Top=2
Width=361
Height=32
Align=5
Color=15780518
Caption=""
AutoSize=1
Point(Width)
}
Add(MultiStrData,5899882,42,42)
{
link(onPart1,7905297:doHeight,[])
link(onPart2,6802933:doText,[])
}
END_SDK
Add(MultiElement,13072705,168,231)
{
link(onEvent1,9922665:doEvent1,[])
}
BEGIN_SDK
Add(EditMulti,10130698,21,21)
{
EventCount=1
WorkCount=1
Width=440
link(doWork1,7370501:doRandom,[(32,27)(32,48)])
}
Add(Random,7370501,42,42)
{
Min=10
Max=120
link(onRandom,12904289:doFor,[])
}
Add(For,12904289,91,42)
{
Start=1
InData=0
link(onEvent,9581157:doRandom,[])
link(onStop,4680645:doEvent1,[(130,55)(130,125)])
}
Add(Random,6329024,238,42)
{
Min=225
Max=255
link(onRandom,1226394:doWork2,[])
}
Add(Convertor,8821630,294,42)
{
Mode=4
link(onResult,10536617:doStrCat,[])
}
Add(StrCat,10536617,357,42)
{
Point(doClear)
link(Str1,3202728:Var1,[(363,33)(349,33)(349,82)])
}
Add(Hub,4680645,301,119)
{
link(onEvent1,13450769:doModify,[])
link(onEvent2,10536617:doClear,[(333,132)(333,55)])
}
Add(GetDataEx,3202728,357,77)
{
link(Data,10536617:Result,[])
}
Add(DoData,3549926,238,84)
{
Data=Integer(32)
link(onEventData,1226394:doWork3,[(284,90)])
}
Add(HubEx,1226394,280,42)
{
link(onEvent,8821630:doConvert,[])
}
Add(Random,9581157,140,42)
{
Min=3
Max=9
link(onRandom,3883865:doFor,[])
}
Add(For,3883865,189,42)
{
Start=1
InData=0
link(onEvent,6329024:doRandom,[])
link(onStop,3549926:doData,[(228,55)(228,90)])
}
Add(StrCase,13450769,357,119)
{
Type=3
link(onModify,3158377:doStrCat,[])
link(Str,3202728:Var2,[])
}
Add(StrCat,3158377,406,119)
{
Str2="."
link(onStrCat,10130698:onEvent1,[(445,125)(445,27)])
}
END_SDK
Add(Memo,345848,238,77)
{
Left=-3000
Top=20
Width=365
Height=150
ScrollBars=2
Point(doWidth)
}
Add(Hub,9373507,154,105)
{
OutCount=3
link(onEvent1,10493838:doOperation,[])
link(onEvent2,345848:doText,[(228,118)(228,104)])
link(onEvent3,5278534:doCalc,[(179,125)(179,160)])
}
Add(Math,10493838,189,105)
{
Op2=23
ResultType=0
link(onResult,345848:doWidth,[])
link(Op1,3753469:Width,[(195,68)(286,68)(286,278)(307,278)])
}
Add(Hub,9922665,210,231)
{
OutCount=3
link(onEvent1,3753469:##add,[(291,237)(291,244)])
link(onEvent2,9373507:doEvent1,[(235,244)(235,223)(144,223)(144,111)])
link(onEvent3,16212788:doString,[])
}
Add(ChildPanel,4992599,112,231)
{
link(onEvent1,13072705:doWork1,[])
link(onEvent2,3753469:##clear,[(158,244)(158,258)])
}
BEGIN_SDK
Add(EditMulti,5310496,21,21)
{
EventCount=2
VarCount=1
Width=160
Height=109
VOffset=14
HOffset=21
link(Var1,12167063:Text,[])
}
Add(Panel,6826419,42,35)
{
Top=422
Width=365
Height=38
Align=4
BevelInner=0
}
Add(Button,15148379,105,35)
{
Left=141
Top=6
Width=100
Height=25
Caption="Создать поле"
link(onClick,5310496:onEvent1,[])
}
Add(Edit,12167063,42,77)
{
Left=11
Top=8
Width=85
Text="13.3333333"
Alignment=1
DataType=4
}
Add(Button,6518200,105,77)
{
Left=253
Top=6
Width=100
Height=25
Caption="Очистить"
link(onClick,5310496:onEvent2,[(144,83)(144,48)])
}
END_SDK
Add(InfoTip,4140659,63,42)
{
Info=#39:Определение количества строк через Memo|
Width=267
Height=158
}
Add(MathParse,5278534,245,154)
{
MathStr="%1*%2+6"
ResultType=0
link(X1,345848:Count,[])
link(X2,4992599:Var1,[(258,145)(104,145)(104,271)(118,271)])
}
Add(FormatStr,16212788,245,245)
{
Mask="%1;%2"
link(onFString,3753469:doText,[])
link(Str1,5278534:Result,[])
}

И обязательно надо указать, что таки - ДА, это решение.
Только скользкое несколько...
Надо уметь отвечать на три вопроса:
  1. чего и почему стоит в Edit
  2. почему Math.Op2=23.0 (или чего другое надо ???)
  3. почему в MathParse.MathStr стоит "+6" (или чего другое надо ???)
И как все это безобразие зависит от DPI, border-ов панели, темы винды...
карма: 9

0