Уменожение и деление

← →
StiTch © (2008-05-20 14:02) [0]

Добрый день.Помогите пожалуста.
При нажатии на кнопку надо умножить эдит1 на эдит2 на эдит3 и разделить на эдит4 и результат вывести в эдит5...заренее благодарен

← →
Palladin © (2008-05-20 14:06) [1]

получится эдит1.5

← →
Reindeer Moss Eater © (2008-05-20 14:06) [2]

Edit5.text := IntToStr(Integer(Edit1) * Integer(Edit2) * Integer(Edit3) / Integer(Edit4));

← →
{RASkov} © (2008-05-20 14:07) [3]

Эдиты не могут учавствовать в мат. операциях...)

← →
Gydvin © (2008-05-20 14:07) [4]

S:=Inttostr(Strtoint(e1)*.../...)

← →
Palladin © (2008-05-20 14:07) [5]

> Reindeer Moss Eater © (20.05.08 14:06) [2]

Edit5.text := IntToStr(Integer(Edit1) * Integer(Edit2) * Round(Integer(Edit3) / Integer(Edit4)));

:)

← →
{RASkov} © (2008-05-20 14:07) [6]

> [2] Reindeer Moss Eater © (20.05.08 14:06)

:) Ну если только так ) Только результат будет не тот, что ожидает автор...

← →
StiTch © (2008-05-20 14:09) [7]

а как сделать правильно???
т.е. Есть формула a+b+c/d...вот надо ещё посчитать при нажатии на кнопку...и вывести ответ

← →
Gydvin © (2008-05-20 14:10) [8]

> StiTch © (20.05.08 14:09) [7]

смотри [5]

← →
{RASkov} © (2008-05-20 14:11) [9]

> [7] StiTch © (20.05.08 14:09)
> а как сделать правильно???

Даже если эту ветку внимательно прочитать и немного подумать, то можно выделить в ней ответ на твой вопрос...

← →
StiTch © (2008-05-20 14:11) [10]

> Edit5.text := IntToStr(Integer(Edit1) * Integer(Edit2) *
> Round(Integer(Edit3) / Integer(Edit4)));

посчитал,но не правильно

← →
Reindeer Moss Eater © (2008-05-20 14:12) [11]

посчитал,но не правильно

Вот скотина.

← →
StiTch © (2008-05-20 14:13) [12]

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

вот как правильно.но спасибо за участие!!!!вы лучшие!!!

> посчитал,но не правильно

не может быть! :) хотя... я не правильно RME поправил, это не та формула получается, вот так попробуй

Edit5.text := FloatToStr(Integer(Edit1) * Integer(Edit2) * Integer(Edit3) / Integer(Edit4));

> StiTch © (20.05.08 14:09) [7]

Edit имеет свойство Text. Оно содержит строку. Строки нельзя умножать и делить. Умножать и делить можно числа. Значит, надо перевести строки в числа. Это делает StrToInt или StrToFloat. В итоге получим число. Число нельзя отобразить в Edit, там можно отобразить строку. Значит, надо перевести число в строку. Это делают IntToStr или FloatToStr.

Сказано все, что нужно. И еще у Вас есть справка. Этого достаточно, чтобы решить задачу самостоятельно. Иначе надо бросать программирование.

Большое спасибо))))

> StiTch (20.05.2008 14:09:07) [7]

Интересно, весьма интересно, это наверно новое слово в математике, замена сложения умножением.

← →
имя (2008-05-20 21:42) [17]

Удалено модератором

Уменожение и деление Найти похожие ветки