Мат. операции в поле еdit

[Yaga]

Только только начал изучать делфи и не совсем ориентируясь в тонне литературы по этой тематике, причем, то, что мне надо найти так и не могу, вот и обращаясь, дайте какую-либо подсказку, ориентир. Загвоздка вот в чем. Как делать простые математические операции в поле edit: деление, умножение, сложение и т.д. Допустим у меня на форме 3 компонента edit и одна кнопка. В двух едитах содержатся какие-то значения, нужно, чтобы при нажатии на кнопку производился мат. расчет и результат выводился в третьем едите, ну например, значение edit2 нужно разделить на значение edit1 и результат записывается в edit3 - и это действие происходит при нажатии на кнопку. Как это сделать, подскажите, пожалуйста, вы же все можете

[ОДИНОЧЕСТВО В СЕТИ]

edit3.text:=floatTostr(round(strtofloat(edit2.text)/strtofloat(edit1.text)*100)/100)

пропиши в событии onclick кнопки!

[Yaga]

А если числа десятичные, и нужно, чтобы осталось в результате 2 знака после занятой, тогда как это описать?

[Ntlegend]

А если числа десятичные, и нужно, чтобы осталось в результате 2 знака после занятой, тогда как это описать?

Посмотри на функцыю RoundTo

[Impuls1989]

function FloatToStrF(Value: Extended; 
                     Format: TFloatFormat; 
                     Precision, Digits: Integer): string;

Функция FloatToStrF преобразовывает действительное значение Value в строку, используя заданный формат Format, точность Precision и число цифр Digits. Параметр Value - действительная константа или выражение. Возможные значения параметра означают следующее:
ffGeneral-Основной числовой формат
ffExponent-Научный формат
ffFixed-Формат с фиксированной запятой
ffNumber-Числовой формат
ffCurrency-Монетарный формат
Параметр Precision определяет точность преобразовываемого значения. Значение Precision должно быть не более 7 при преобразовании типа Single, не более 15 для Double, не более 18 для Extended.
Параметр Digits совместно с Format определяют форматирование строки.

Если преобразовываемое выражение окажется не числом, функция вернет значение "NAN". Если преобразовываемое значение превышает по модулю величину, допустимую для объявленного типа данных, функция вернет значение "INF" (бесконечность) или "-INF" (минус бесконечность).

[Yaga]

Э, почти понял принцип. А помогите еще вот с чем. Как с процентами работать. Вот, например, имеется 3 компонента еdit. В первом содержится какое, то значение, во втором мы вводим количество процентов, на которое будем увеличивать то значение, которое есть в первом едите. Третий едит - это результат, то есть значение первого едита умноженое на процентное значение второго едита. Какие функции есть для этого, как сделать такое?

[Serge_Bliznykov]

Edit3.Text := FloatToStr( StrToFloat(Edit1.Text) * (StrToFloat(Edit2.Text)+100) );

[856100]

Edit3.Text:=Inttostr( Strtoint(Edit1.text)div 100 * Strtoint(Edit2.text) + Strtoint(Edit1.text));

Div - Целочисленно деление (Любой остаток отвергается)

[Yaga]

Эх, нифига я не понял, хотел сам написать задачку, да не получается ничего. Короче, есть 3 едита, один checkbox, и одна кнопка. Допустим, задача для расчета зарплаты, в первом едите стоит значение основой з.п. Во втором - пользователя ставит процент премии. То есть, если у человека зарплата 1000 руб, а во втором едите стоит значение 100, то к з.п. прибавится премия в размере 100% от з.п. То есть общая зарплата будет 2000 рублей. Общая зарплата выводится в едите3. А если еще стоит галочка чекбокса, назовем ее надбавка за вредность, то к основной зарплате и премии будет добавлена сумма в размере 100% основной зарплаты (значение едит1). Итак, в конечном виде: при установленой галочке, значение едит1=1000, едит2=100(%). При нажатии кнопки в едит3 должна вывестись общая зарплата 3000 руб. Все просто как божий день, а но как это выглядит в кодовом виде? о_0

[Ntlegend]

var a, b:integer;
begin
a:=StrToInt(Edit1.Text);
//зпоминаем зарплату
b:=StrToInt(Edit2.Text)+100;
//берем % надбавки и прибавляем к нему еще 100%
if ChBox.Checked
  then inc(b, 100);
//если стоит галочка - то прибавляем еще 100%
a:=Round(a*(b/100));
//зарплату умножаем на коефицыент.. тоесть на пролучившийся процент..
Edit3.Text:=IntToStr(a);
//выводим ее в эдит3
end;