Вверх ↑
Этот топик читают: Гость
Ответов: 8928
Рейтинг: 823
#16: 2013-06-11 12:09:10 ЛС | профиль | цитата
GetChiper, code_31225.txt
карма: 19

0
файлы: 1code_31225.txt [4.1KB] [172]
Ответов: 9906
Рейтинг: 351
#17: 2013-06-11 14:05:38 ЛС | профиль | цитата
Леонид, у тебя есть логическая ошибка.

Надо:
  1. сначала ##add (без установки текста)
  2. потом VBoxLayout.doResize
  3. потом Memo.doWidth (он же спросит ширину панели => она должна быть создана ДО, а не после)
  4. и уже после этих кругов с бубном - установить высоту и текст. Через отдельную точку, а не через ##add

Иначе, можно и вот такое получить

leonid_00.png
------------ Дoбавленo в 14.05:
Мшуц Акууя
карма: 9

0
файлы: 1leonid_00.png [15KB] [419]
Ответов: 8928
Рейтинг: 823
#18: 2013-06-12 13:37:35 ЛС | профиль | цитата
Galkov, спасибо!, надеюсь ТС учтёт
(Замучил деревенский интернет, то есть, то нет, а то есть и скорость аж 10 бит/сек)
карма: 19

0
Ответов: 9906
Рейтинг: 351
#19: 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
Ответов: 8928
Рейтинг: 823
#20: 2013-06-13 20:13:05 ЛС | профиль | цитата
Galkov писал(а):
Надо уметь отвечать на три вопроса:
И действительно, упустил Исправляюсь (для ТС):
1. В Edit высота срочки, зависит от размера шрифта;
2. В Math.Op2=23.0 -- прибавка к ширине Memo на оптичкованный вертикальный скрол;
3. В MathParse.MathStr стоит "+6" -- отступ вниз от последней строчки для уравнивания с отступом сверху.

Интернет тоже исправился (надолго-ли), скорость не московская, но уже рука не ищет молотка
карма: 19

0
Ответов: 9906
Рейтинг: 351
#21: 2013-06-13 22:09:10 ЛС | профиль | цитата
Леонид, это я писал не в качестве претензии, а чтобы у кого ни то -- голова не закружилась от счастия, что типа работает

Скажем, шрифты (которые обязаны быть одинаковыми) высотой 8. DPI -- 96 (это дома). Межстрочный интервал, предположим -- 2 (в чем я не очень уверен). Тогда получается 96*(8+2)/72 = 13.3333...
На правду вроде бы и похоже, а вот стопудовой уверенности -- нет как-то
------------ Дoбавленo в 22.09:
Аналогично и с дугими цифирькам: на правду вроде бы и похоже, а вот стопудовой уверенности -- нет как-то
Что и обозначил фразой: (или чего другое надо ???)
карма: 9

0
Ответов: 8928
Рейтинг: 823
#22: 2013-06-13 22:57:38 ЛС | профиль | цитата
Galkov, так простопудовую уверенность и не заикался, я же не только по классификации радиолюбитель, но и по жизни
(Помните, как говорил Жванецкий, с вывертом, "А у нас было!", так и я "А у меня работает!" )
карма: 19

0
22
Сообщение
...
Прикрепленные файлы
(файлы не залиты)