Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2006.12.03;
Скачать: [xml.tar.bz2];

Вниз

Как подсчитать дробные числа?   Найти похожие ветки 

 
Новечек   (2006-11-15 15:50) [0]

Как подсчитать два дробных числа записанных в эдитах? С целыми числами все ясно :
I := strtoint(edit1.text + Edit2.text)
А вот как быть с дробными - ума не приложу... Помогите пожалуйста.


 
Elen ©   (2006-11-15 15:53) [1]


> I := strtoint(edit1.text + Edit2.text)

Интересное решение. Предлагаю другое
для целых - I := strtoint(edit1.text)+strtoint(Edit2.text);
для не целых - I := strtofloat(edit1.text)+strtofloat(Edit2.text);


 
MikePetrichenko ©   (2006-11-15 16:36) [2]


> I := strtoint(edit1.text + Edit2.text)

Круто!


 
novill ©   (2006-11-15 16:37) [3]

орех


 
Anatoly Podgoretsky ©   (2006-11-15 16:55) [4]

> Elen  (15.11.2006 15:53:01)  [1]

Я я вместо двух решений предлагаю одно

F := strtofloat(edit1.text) + strtofloat(Edit2.text);

Universum


 
Anatoly Podgoretsky ©   (2006-11-15 16:56) [5]

> MikePetrichenko  (15.11.2006 16:36:02)  [2]

А чего смущает то, ты сначала попробуй.


 
MikePetrichenko ©   (2006-11-15 17:02) [6]


> А чего смущает то, ты сначала попробуй.

Ничегоне смущает. Только что получим?
Да и с дробными тогда решения не верны.
В Edit1 "1111"
В Edit2 "2222"
На выходе получим ценлое
11112222

С дробными будет бред.

Либо постанова не верна, либо я баран :)


 
Jeer ©   (2006-11-15 17:27) [7]

MikePetrichenko ©   (15.11.06 17:02) [6]

А кто сказал, что автор имел в виду десятичную позиционную систему счисления ?


 
MikePetrichenko ©   (2006-11-15 17:47) [8]


> А кто сказал, что автор имел в виду десятичную позиционную
> систему счисления ?

Да хоть шестнадцатиричную.


 
Amoeba ©   (2006-11-15 17:50) [9]

Интересно, а автор вопроса откликнется? Или далее все ограничится флеймом мастаков, пока модератор не прикроет ветку?


 
Плохиш ©   (2006-11-15 18:02) [10]


> Интересно, а автор вопроса откликнется? Или далее все ограничится
> флеймом мастаков, пока модератор не прикроет ветку?

Он пошёл в "Потрепаться" создавать новую ветку о том какие здесь все пративные-пративные...


 
MikePetrichenko ©   (2006-11-15 18:51) [11]


> далее все ограничится флеймом мастаков

Конечно. А иначе, для чего мы здесь сегодня собрались? :)


 
Desdechado ©   (2006-11-15 20:29) [12]

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


 
Anatoly Podgoretsky ©   (2006-11-15 21:12) [13]

> MikePetrichenko  (15.11.2006 17:02:06)  [6]


 
Anatoly Podgoretsky ©   (2006-11-15 21:14) [14]

> MikePetrichenko  (15.11.2006 17:02:06)  [6]

А я про дробные ничего не говорил, но там надо только сменить функцию и соблюдать синтаксис.
Например в первом "123,", а во втором "45" получим сначала строку 123,45 которую нормально преобразуем


 
Anatoly Podgoretsky ©   (2006-11-15 21:15) [15]

> Desdechado  (15.11.2006 20:29:12)  [12]

Можно и в начало второе, лишь бы в результате конкатенации получилось нормальная для функции строка


 
ASoft   (2006-11-16 04:38) [16]

вообще-то, афтор задал вопрос

> Как подсчитать два дробных числа записанных в эдитах

:)
а не как преобразовать и вывести число, получившееся путем конкатенации  :)


 
Anatoly Podgoretsky ©   (2006-11-16 07:47) [17]


> а не как преобразовать и вывести число, получившееся путем
> конкатенации  :)


Ну смотри сам


> С целыми числами все ясно :
> I := strtoint(edit1.text + Edit2.text)


Тогда по аналогии, сменить strtoint на strtofloat
Никакой разницы, раз с целыми числами все ясно


 
ЮЮ ©   (2006-11-16 08:55) [18]


> Никакой разницы, раз с целыми числами все ясно


Если в эдитах толко цифры, то следует вставить между ними DecimalSeparator :
f := StrToFloat(edit1.text + DecimalSeparator + Edit2.text)

З.Ы. Только на другом компьюетере StrToFloat может "сломаться" при другом DecimalSeparator


 
ЮЮ ©   (2006-11-16 08:57) [19]


> З.Ы. Только на другом компьюетере StrToFloat может "сломаться"
> при другом DecimalSeparator


В том случае, конечно, еслт резульаь конкатенации записан как строка на одном компьютере, а читается на дркгом


 
Anatoly Podgoretsky ©   (2006-11-16 09:04) [20]

> ЮЮ  (16.11.2006 08:55:18)  [18]

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

ЗЫ не верное, DecimalSeparator  не повлияет на слом, он всегда (если не лезть в дебри) правильный.


 
Anatoly Podgoretsky ©   (2006-11-16 09:06) [21]

> ЮЮ  (16.11.2006 08:57:19)  [19]

Вот эти дебри и есть, при передаче информации форматы должны быть согласованы, как правило в соглашении приходят к системному (математическому) ака точка соглашению.
Дельфи поддерживает работу с системным разделителем независимо от регионального.


 
ASoft   (2006-11-16 09:35) [22]


> Anatoly Podgoretsky ©   (16.11.06 07:47) [17]

ну.. раз ясно автору все...
а я думал вопрос еще в силе, раз автора не видать :)
какие вы неугомонные :)


 
Anatoly Podgoretsky ©   (2006-11-16 09:59) [23]

> ASoft  (16.11.2006 09:35:22)  [22]

Ну автор молчит, наверно от стыда в уголочке плачет.
Нет что прийти и рассказать, а чего же я хочу.



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2006.12.03;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.49 MB
Время: 0.046 c
2-1163409157
иван8511
2006-11-13 12:12
2006.12.03
Как из одного события вызвать другое?


1-1161673010
Чапаев
2006-10-24 10:56
2006.12.03
Про многоязычное приложение... ETM.


15-1163750633
Anatoly Podgoretsky
2006-11-17 11:03
2006.12.03
Новости APC


2-1163573400
Alex_C
2006-11-15 09:50
2006.12.03
Положение текста в мемо


15-1163361396
Eraser
2006-11-12 22:56
2006.12.03
RDP и терминальные сессии





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский