Mail

В этот день много лет назад...
26 ноября. В 1956 году (68 лет назад) - В Ленинграде принимается решение о передаче "Караульного дома" на площади Мира (ныне Сенная) для устройства автобусного вокзала.

Turbo Pascal Documentation

Процедура FillChar

     Функция: Помещает в заданное число  следующих  друг  за
другом байтов указанное значение.
     Описание: FillChar(x; счетчик : word; значение)
     Примечания: Параметр x является ссылкой  на  переменную
любого типа, "счетчик" представляет собой выражение длиной в
слово, "значение" является  выражением  перечислимого  типа.
Процедура записывает значение, указанное в параметре "значе-
ние", в то количество следующих друг за другом байтов  памя-
ти, начиная с первого байта, занимаемого переменной х, кото-
рое определяется параметром "счетчик".
      Проверка на допустимость границ не выполняется, поэтому
будьте внимательны.
     Если это возможно, при использовании процедуры FillChar
задавайте  параметр "счетчик". При использовании этой проце-
дуры для строк не забудьте после заполнения установить длину
в байтах.
     Прочее: См. также процедуру Моvе.
     Пример:

var
  s : string[80];
begin
  { задать строку, состоящую из пробелов }
  FillChar(s, SizeOf(s),' ');   { установить длину последо-
                                  вательности байтов }
  s[0] := #80;
end.