Процедура HistoryAdd HistList

================================================================= Объявление procedure HistoryAdd(Id: Byte; var Str: String);

Функция Добавляет строку Str в список истории, указываемый с помощью Id.