| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
ReadLn +Double
нико-лай © (2007-09-11 14:08:00)Как из текстового файла прочитать из строки значение Double, если оно в файл записано, так:
10.2410
10,2410
dbl: Double;
ReadLn(TextFile, dbl);
Тут что-то зависит от системного разделителя? Вообщем какое сделать универсальное решение, что-бы считать оба этих варианта 10.2410 10,2410 как double?
Anatoly Podgoretsky (2007-09-11 15:50:00) [1]Загрузи в TtringList и потом двумя командами измени запятую и точку на десятичный разделитель, примено как в [2]
{RASkov} (2007-09-11 14:15:00) [2]if DecimalSeparator = ',' then
StringReplace(dbl, '.', DecimalSeparator, [])
else
StringReplace(dbl, ',', DecimalSeparator, []);
d:=StrToFloatDef(dbl, 0);
{RASkov} (2007-09-11 14:15:00) [3]> dbl: Double;
dbl: String;
d: Double;
Virgo_Style (2007-09-11 14:10:00) [4]читать как строку и переводить в double
| |
