Забавная история...

← →
sergeant (2003-11-30 19:38) [0]

Не знаю как у всех, а мой Delphi 7 в функции strtofloat() понимает число "1,234", и никак не хочет понимать "1.234". Но вот прикол - функция str(k:3:3,string1), при к=1.234567 переводит его в строку string1:="1.234", т.е разработчики явно не позаботились о форматах чисел.
В итоге у меня есть таблица (stringgrid) в которую постоянно записываются и считываются программой вещественные числа. Вопрос - как их вывести на экран в удобочитаемом виде (3 знака после запятой), а потом считать программой.

Огромное всем спасибо!!!!!!!

← →
Anatoly Podgoretsky (2003-11-30 19:44) [1]

Разработчики побеспокоились, называется региональные настройки, устанавливаются через панель управления.

← →
dataMaster (2003-11-30 19:48) [2]

1. Читаешь ячейку
2. Делаешь StringReplace() - меняешь DecimalSeparator на "."
3. Потом str(k:3:3,string1)
4. По желанию снова делаешь StringReplace(), но уже "." меняешь на DecimalSeparator и
5. Показываешь в нужном месте.

← →
Stilgar (2003-11-30 19:55) [3]

Если не ошибаюсь, поможет изменение DecimalSeparator (SysUtils).

Забавная история... Найти похожие ветки