Pascal 7 & Objects
Cancel (никогда не переопределяется)
-----------------------------------------------------------------
procedure Cancel(var Msg: TMessage); virtual id_First + id_Cancel;
Предназначается для внутреннего использования с целью восс- тановления предыдущего состояния принтера, если пользователь пос- ле Setup нажал командную кнопку Cancel.
