Текущий архив: 2005.01.30;
Скачать: CL | DM;
Вниз
Точка в числе при выводе в текстовый файл Найти похожие ветки
← →
Andrew_P © (2005-01-19 18:06) [0]Здравствуйте.
Подскажите мне как записать в текстовый файл числовое значение типа real с точкой, а не с запятой. Я делаю так:
var f : textfile;
procedure TKSFExport.Line(const x1, y1, x2, y2: real; const style: byte);
begin
Inc(FCountLine);
WriteLn(f,"line");
WriteLn(f,Format("%.4f",[x1]));
WriteLn(f,Format("%.4f",[y1]));
WriteLn(f,Format("%.4f",[x2]));
WriteLn(f,Format("%.4f",[y2]));
WriteLn(f,Format("%d",[style]));
end;
В итоге я получаю запятую.
Что я должен сделать?
Заранее благодарен.
← →
Palladin © (2005-01-19 18:07) [1]DecimalSeparator:="."
← →
DSKalugin © (2005-01-19 18:41) [2]а Формат там и даром не нужен. Это же текстовый файл. Соотв там ВСЕ текст
Преобразуй FloatToStr() или FloatToStrF()
А потом замени запятую на точку если она там есть функцией AnsiReplaceStr()
Страницы: 1 вся ветка
Текущий архив: 2005.01.30;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.031 c
