Вверх ↑
Ответов: 3349
Рейтинг: 233
#1: 2010-10-22 18:29:58 ЛС | профиль | цитата
Add(MainForm,5371583,399,91)
{
Width=271
Height=250
}
Add(Edit,6194535,266,161)
{
Left=20
Top=80
Width=45
Text="90"
}
Add(Edit,13405503,322,161)
{
Left=105
Top=80
Width=45
Text="1.82"
}
Add(Edit,8353239,441,238)
{
Left=195
Top=80
Width=35
Text="20"
}
Add(MathParse,9787331,315,308)
{
DataCount=3
MathStr="50 + ( ( %2 - 1.50 ) * 100 ) * 0.75 + ( %3 - 20 ) / 4"
link(onResult,7160870:doText,[])
link(X1,11290087:Var3,[(321,250)])
link(X2,11736827:Var2,[])
link(X3,8353239:Text,[(335,289)(447,289)])
}
Add(Edit,7160870,399,308)
{
Left=15
Top=175
Width=45
Text="0"
}
Add(Edit,4620264,392,455)
{
Left=90
Top=175
Text="0"
}
Add(Button,11407319,154,308)
{
Left=15
Top=110
Width=70
Height=30
Caption="Узнать"
link(onClick,7524938:doEvent1,[])
}
Add(Label,2459272,168,189)
{
Left=10
Top=50
Width=65
Height=27
Caption="Введите ваш вес"
AutoSize=1
Alignment=2
}
Add(Label,10810512,168,238)
{
Left=95
Top=50
Width=65
Height=27
Caption="Введите ваш рост"
AutoSize=1
Alignment=2
}
Add(Label,4264649,168,140)
{
Left=180
Top=50
Width=68
Height=27
Caption="Введите ваш возраст"
AutoSize=1
Alignment=2
}
Add(Hub,7524938,217,308)
{
OutCount=3
link(onEvent1,9787331:doCalc,[])
link(onEvent2,1632706:doCalc,[(269,321)(269,461)])
link(onEvent3,12070504:doCompare,[(249,328)(249,517)])
}
Add(MathParse,1632706,280,455)
{
DataCount=3
MathStr="%1/(%2*%2)"
link(onResult,4620264:doText,[])
link(X1,11290087:Var2,[(286,345)(272,345)])
link(X2,11736827:Var1,[(293,243)])
}
Add(GetDataEx,11736827,322,238)
{
link(Data,13405503:Text,[])
}
Add(GetDataEx,11290087,266,245)
{
link(Data,6194535:Text,[])
}
Add(Label,1455740,441,196)
{
Left=10
Top=145
Width=58
Height=27
Caption="Идеальный вес"
AutoSize=1
Alignment=2
}
Add(Label,105747,392,413)
{
Left=90
Top=150
Width=52
Height=17
Caption="Ваш ИМТ"
AutoSize=1
Alignment=2
}
Add(If_else,12070504,476,511)
{
Type=1
Op2=Integer(16)
link(onTrue,16279536:doCompare,[])
link(Op1,16669944:Var2,[])
}
Add(Message,8612921,637,511)
{
Message="У вас выраженный дефицит тела"
Caption="Ваш диагноз"
}
Add(If_else,16279536,546,511)
{
Type=2
Op2=Integer(10)
link(onTrue,8612921:doMessage,[])
link(Op2,16669944:Var3,[(559,499)])
}
Add(GetDataEx,16669944,476,494)
{
Angle=3
link(Data,4620264:Text,[(398,499)])
}


Сделал ошибку, исправил
карма: 1

0
файлы: 1code_21176.txt [2.3KB] [119]