Вверх ↑
Этот топик читают: Гость
Ответов: 200
Рейтинг: 5
#1: 2009-08-28 17:03:44 ЛС | профиль | цитата
Не могу понять как сделать (в пятницу вечером голова о другом уже думает )
Вообщем проблема вот в чем. Есть два Edit, нужно проверить, если число из второго Edit больше числа из первого Edit на 10%, то выдать одно предупреждение, если меньше на 10% то выдать другое предупреждение, а если не выполнено не одно из условий(то-есть находится в заданном диапазоне) то выполнить третье действие.
------------ Дoбавленo в 17.33:
Все, догнал
карма: 0

0
Разработчик
Ответов: 26324
Рейтинг: 2148
#2: 2009-08-28 17:58:53 ЛС | профиль | цитата
Evgen818 писал(а):
Все, догнал

Вот, проще не придумал, может пригодится


Add(MainForm,2953706,91,105)
{
}
Add(Edit,16014464,168,105)
{
Left=10
Top=10
Width=95
Text="1"
DataType=4
}
Add(Edit,5339823,210,105)
{
Left=115
Top=10
Width=95
Text="1.11"
DataType=4
}
Add(Button,9472716,91,161)
{
Left=75
Top=40
Width=75
Caption="Проверить"
link(onClick,919907:doCalc,[])
}
Add(MathParse,919907,168,161)
{
MathStr="((%2 / %1) >= 1.1) + ((%2 / %1) <= 0.9) * 2 "
link(onResult,2500878:doEvent,[])
link(X1,16014464:Text,[])
link(X2,5339823:Text,[(181,149)(216,149)])
}
Add(IndexToChanel,2500878,217,161)
{
Count=4
link(onEvent1,4474465:doData,[(261,167)(261,139)])
link(onEvent2,3149163:doData,[])
link(onEvent3,15871885:doData,[(261,181)(261,209)])
}
Add(DoData,3149163,273,168)
{
Data=String(Второе больше на 10% первого)
link(onEventData,9249010:doWork2,[])
}
Add(DoData,4474465,273,133)
{
Data=String(В диапазоне)
link(onEventData,9249010:doWork1,[(319,139)])
}
Add(DoData,15871885,273,203)
{
Data=String(Второе меньше на 10% первого)
link(onEventData,9249010:doWork3,[(319,209)])
}
Add(Message,4649298,343,168)
{
}
Add(HubEx,9249010,315,168)
{
link(onEvent,4649298:doMessage,[])
}

карма: 22

0
Администрация
Ответов: 15295
Рейтинг: 1519
#3: 2009-08-28 18:06:20 ЛС | профиль | цитата
проще только с заменой на StrList

Add(MainForm,12787029,322,189)
{
}
Add(Edit,16014464,364,189)
{
Left=10
Top=10
Width=95
Text="1"
DataType=4
}
Add(Edit,5339823,406,189)
{
Left=115
Top=10
Width=95
Text="1.11"
DataType=4
}
Add(Button,9472716,322,245)
{
Left=75
Top=40
Width=75
Caption="Проверить"
link(onClick,919907:doCalc,[])
}
Add(MathParse,919907,364,245)
{
MathStr="((%2 / %1) >= 1.1) + ((%2 / %1) <= 0.9) * 2 "
link(onResult,6496977:doGetString,[])
link(X1,16014464:Text,[])
link(X2,5339823:Text,[(377,233)(412,233)])
}
Add(Message,4649298,490,210)
{
}
Add(StrList,6496977,448,203)
{
Strings=#11:В диапазоне|28:Второе больше на 10% первого|28:Второе меньше на 10% первого|
Point(doGetString)
Point(onGetString)
link(onGetString,4649298:doMessage,[])
}

карма: 26
0
Ответов: 200
Рейтинг: 5
#4: 2009-08-31 15:26:03 ЛС | профиль | цитата
nesco, Dilma, спасибо.
Я вот так делал.
code_14774.txt
карма: 0

0
файлы: 1code_14774.txt [1.1KB] [127]
4
Сообщение
...
Прикрепленные файлы
(файлы не залиты)