Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Помогите бедному ламеру!!! [D6, WinXP]

Lamerok © (2002-11-12 18:43:00)
Простите за тупой вопрос, но как сложить дробные числа?
Заранее спасибо.

Новенький в Делфи (2002-11-13 03:46:00) [1]
2 Lamerok
В Делфи Integer это тип целых чисел.
Но есть ещё тип дробных чисел например Real
и соответственно ф-ции для преобразования другие будут

потому пишешь
var
x,y,z: real;
begin
x:= StrToFloat(edit1.text);
y:= StrToFloat(edit2.text);
z:=x+y;
Memo1.lines.add(FLoatToStr(z));

или всё более сокращённо как написал OlegMoscow

OlegMoscow (2002-11-12 18:57:00) [2]
если ошибка - значит действительно что то не так :)
покажи как ты делаешь? по идее элементарно:

var
vResult:double;
begin
vResult:=StrToFloat(Edit1.Text)+StrToFloat(Edit2.Text);
end;

и еще - глянь в региональных установках - какой символ у тебя используется как разделитель целой и дробной части (точка или запятая)

Lamerok (2002-11-12 18:56:00) [3]
Конечно можно ещё и так

var
x,y,z: integer;
begin
X:= StrToInt(Trim(Edit1.Text));
Y:= StrToInt(Trim(Edit2.Text));
Z:= StrToInt(Trim(Edit3.Text));

Memo1.Lines.Add(IntToStr(X)+"."+IntToStr(Y)+"+"+IntToStr(z)+"="+
FloatToStr(x+z)+"."+FloatToStr(y));

Но это очень нудно, может есть какая то процедура??

Lamerok (2002-11-12 18:52:00) [4]
>>вспоминаем математику, приводим к общему знаменателю...

у меня две переменные x и y , которые вводятся в TEdit , но проблема в том, что при вводе (напримнр) 1.2 + 4.6 возникает ошибка. Или я что-то не так делаю.

SaS13 (2002-11-12 18:46:00) [5]
вспоминаем математику, приводим к общему знаменателю...

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »