procedure Str(const Value;  var S:  string);
procedure Str(const Value:Width;  var S:  string);
procedure Str(const Value:Width:Precision;  var S: string);

Процедура Str форматирует числовую строку аналогично Write, за исключением того, что результат сохраняется в строке S. Value может быть любым числовым или логическим выражением. Строка S может быть длинной строкой, короткой строкой или символьным массивом с нулевым начальным индексом. Str не является настоящей процедурой.
Аргументы Width и Precision могут быть любыми целыми выражениями. Width определяет минимальный размер символьного представления Value, Precision - количество знаков после десятичной точки для вещественного числа.
Str использует столько символов, сколько требуется, поэтому Width -это лишь предлагаемая минимальная ширина. Если числу требуется меньше, чем Width символов, Str дополняет его пробелами слева. Если Width не указывается, Delphi использует 1 в качестве минимального значения для целых чисел и выводит вещественные числа с помощью 26 символов в следующем формате:
-1.12345678901234567E+1234
Если Value - вещественное значение, Str сокращает количество десятичных знаков, чтобы поместить значение в строку не более Width символов. Однако Str всегда оставляет как минимум одну цифру после десятичной точки. Можно указать значение Precision, которое сообщает процедуре Str, сколько знаков после десятичной точки нужно оставить. Если указывается Precision, Str использует форму записи числа с фиксированной точкой вместо экспоненциальной формы.

• Модуль Syslltils содержит несколько функций, обеспечивающих большую гибкость, чем Str.
• Если ShortString слишком мала для вывода всего числа Value, Str останавливается, когда строка заполнена, и не выдает сообщений об ошибке.

procedure ShowInfo;
var
  S:string;
begin
  Str(List.Count, S);
  ShowMessage('B списке ' + S + ' элементов.');
end;