Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Как правильно передать американский формат вещественного числа? [D7, FB]


jeka_t ©   (2007-01-16 10:13:00) 

у меня есть компонент DataSet1, там есть поле Field1 типа Float
хочу значение текущей записи по этому полю записать в строку, но только в американской системе едениц, т.е. разделитель цедлой и дробной части = ".", без учёта настройки в системе...
'='+DataSet1.FieldByName(Field1).AsString
должно получится
'=458.456'


Johnmen   (2007-01-16 15:51:00) [1]

var SaveDecimalSeparator : char;

SaveDecimalSeparator:=DecimalSeparator;
DecimalSeparator:='.';
s:=FormatFloat('#0.000',DataSet1.FieldByName(Field1).AsFloat);
DecimalSeparator:=SaveDecimalSeparator;


Max Zyuzin   (2007-01-16 11:56:00) [2]

FloatToStrF поможет точно


novill   (2007-01-16 10:45:00) [3]

StringReplace вам поможет )


Наверх

Титульная страница Поиск, карта сайта Написать письмо