[StiTch]

Как правильно сделать код для расчёта формулы

a*b/100-(c+d)

[xchrom]

тёмен и непонятен твой вопрос подробнее надоть

update: товарищ вам уже в прошлых ваших постах все пояснили, неужели переделать не получается??

FYI про приоретет операций не забываем сперва отрицание, потом умножение и деление, последними сложение и вычитание.

[StiTch]

edit1.text := floattostr( strtoint(edit2.text)*strtoint(edit3.text)/strtoint(edit4.text)-strtoint(edit5.text)+strtoint(edit6.text)

так???

и ещё вопрос будет ли он считать если ответ будет отрицательный???

[xchrom]

будет не сомневайся

[StiTch]

а по моему нет

[xchrom]

не будет только если на ноль делить буш

[StiTch]

проверь мой код...

[xchrom]

проверил, скобки закрывающей не хватает в конце

Код:

  edit1.text := floattostr( strtoint(edit2.text)*strtoint(edit3.text)/strtoint(edit4.text)-strtoint(edit5.text)+strtoint(edit6.text));

[StiTch]

вот)пасиба)

[StiTch]

как присовить эдиту постоянное значени 100...то есть чтобы постоянно не вводить это число

[lmikle]

В коде: Edit1.Text := 100
Во время дизайна в Object Inspector у контрола в свойтве Text ставишь 100.