Информационный сервер для программистов: Исходники со всего света. Паскальные исходники со всего света
  Powered by Поисковый сервер Яndex: Найдется ВСЁ!
На Главную Исходники Форум Информер Страны мира
   ЧАВО - Частые Вопросы и Ответы    >>    numtostr
   
 
 STR. Как преобразовать число в строку   Sly Golovanov 27.12.1997

Функция для преобразования числа в строку и вывод вещественных чисел с заданным количеством знаков после запятой.


 
 

Pascal FAQ created by SLY Golovanov, 2:5020/278.13 (slightly corrected by Valery Votintsev 2:5021/22) ============================================================================== Q>: А как преобразовать целое число в строку? A: Воспользоваться процедурой STR. А если нужна не процедура, а функция, то взять вот эту: function IntToStr(I: Longint): String; { Convert any integer type to a string } var S: string; begin Str(I, S); IntToStr := S; end; Q>: А как преобразовать вещественное число в строку? A: Если нужно просто вывести число, то WriteLn(R:n:m) А если нужна именно строка, то воспользоваться той же процедурой STR: var R:real; S:string; ... Str(R:n:m,S); Здесь n - общее количество знаков в строке, включая десятичную точку, m - количество знаков после запятой (дробная часть) Кстати, если задать n:=-1, то ведущих пробелов в строке не будет! В help'е про эту возможность не написано, и про нее не все знают. Например: Str(Pi:10:2,S); {даст ' 3.14'} Str(Pi:10:2,S); {даст '3.14' } --- * Origin: (2:5020/794.13)