Вверх ↑
Ответов: 1536
Рейтинг: 176
#1: 2016-01-06 15:51:59 ЛС | профиль | цитата
Что-то я не могу понять, почему не работает как надо? С вещественными числами, вроде нормально, а с целыми если крутить колесом мыши по убывающей, то условие в MathParse не выполняется. Что там не так?
Add(MainForm,2953706,210,140)
{
Width=402
Height=194
Point(onMouseWheel)
link(onMouseWheel,3291139:doCalc,[])
}
Add(MathParse,3291139,266,161)
{
DataCount=3
MathStr="(((%1=1)and(%2=120))*(%3+1))+\r\n(((%1=1)and(%2=-120))*(%3-1))+\r\n(((%1=0)and(%2=120))*(%3+0.1))+\r\n(((%1=0)and(%2=-120))*(%3-0.1))"
link(onResult,4842405:doValue,[(317,167)(317,90)])
link(X1,13427123:Value,[])
link(X3,4842405:Value,[(286,139)(342,139)])
}
Add(Timer,12326672,112,84)
{
Interval=100
link(onTimer,541404:doReadKey,[])
}
Add(Keyboard,541404,161,84)
{
@Hint=#4:CTRL|
Key=17
link(onReadKey,6088704:doData,[])
AddHint(-9,-30,43,13,@Hint)
}
Add(Memory,13427123,266,84)
{
Default=Integer(0)
}
Add(ChangeMon,6088704,210,84)
{
link(onData,13427123:doValue,[])
}
Add(Memory,4842405,336,84)
{
Default=Integer(1000)
link(onData,16538876:doText,[])
}
Add(Label,16538876,385,84)
{
Left=145
Top=45
}
карма: 1
Не так страшна ошибка, как опасность её не заметить.

0