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

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

Вывод real чисел на экран [D6, Win95/98]


Beginner ©   (2002-04-14 03:31:00) 

Когда str(string,real), где real - число < 1, то string получает немного не то, что нужно, аименно, произвольно ставит точку.
Подскажите пожалуйста коректный способ вывода real чисел.


Anatoly Podgoretsky   (2002-04-14 14:04:00) [1]

Вроде бы str не использует DecimalSeparator


Beginner   (2002-04-14 13:53:00) [2]

Спасибо!


drpass   (2002-04-14 11:08:00) [3]

Точка ставится не произвольно, а в экспоненциальной форме. Можно и отформатировать
str(string,real:5:2) - пять символов отводится на все число, два символа после запятой и т.д.


Вася Пупкин   (2002-04-14 06:28:00) [4]

Выбирай ;)

function FormatFloat(const Format: string; Value: Extended): string;

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

function FloatToText(Buffer: PChar; const Value; ValueType: TFloatValue; Format: TFloatFormat; Precision, Digits: Integer): Integer;

function FloatToTextFmt(Buffer: PChar; const Value; ValueType: TFloatValue; Format: PChar): Integer;


Voldemar   (2002-04-14 03:54:00) [5]

S: string;
R: real;

S:=FloatToStr(R);


Наверх

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