Вверх ↑
Ответов: 207
Рейтинг: 14
#1: 2020-01-26 13:53:18 ЛС | профиль | цитата
zsk-norilsk писал(а):
но есть, но...)
Нужно при наличии знака равно считать, а при отсутствии просто оставить формулу в строке.
Буду прикручивать свои хотелки)))

Add(MainForm,2153324,308,287)
{
Width=278
Height=101
Caption="Итог в строке"
Position=1
}
Add(Edit,8717068,371,287)
{
Left=5
Top=15
Width=245
Text="(1+4*2)/2"
ClearAfterEnter=1
Point(onDblClick)
link(onEnter,611287:doValue,[])
link(onDblClick,457319:doData,[(439,307)(439,342)])
}
Add(MathParse,8534986,637,287)
{
DataCount=0
MathStr=""
Point(doMathStr)
link(onResult,753807:doWork2,[(683,293)(683,372)])
}
Add(Hub,6872337,609,294)
{
link(onEvent1,8534986:doMathStr,[])
link(onEvent2,8534986:doCalc,[(630,307)(630,293)])
}
Add(Memory,611287,455,294)
{
link(onData,1408782:doCompare,[])
}
Add(DoData,457319,455,336)
{
link(onEventData,753807:doWork1,[(620,342)])
link(Data,611287:Value,[])
}
Add(HubEx,753807,616,366)
{
Angle=2
link(onEvent,8717068:doText2,[(366,372)(366,300)])
}
Add(Replace,3725656,560,294)
{
SubStr="="
link(onReplace,6872337:doEvent1,[])
}
Add(StrMask,1408782,504,294)
{
Mask="*=*"
link(onTrue,3725656:doReplace,[(548,307)(548,300)])
}


--- Добавлено в 2020-01-26 13:57:46

zsk-norilsk писал(а):
А есть возможность сохранять эту формулу, чтобы при открытии программы, формула была в памяти?

С помощью ini

--- Добавлено в 2020-01-26 14:15:06

Если = только в начале, тогда маска такая

=*
карма: 2

0
Редактировалось 7 раз(а), последний 2020-01-26 14:15:06