-----------------------------------------------------------------
procedure EndDocument; virtual;
Метод Print объекта печати вызывает EndDocument после завер- шения печати каждой копии документа.
Используемый по умолчанию метод EndDocument ничего не делает. Наследующие объекты могут переопределять его для выполнения необ- ходимых действий в конце печати каждого документа.