procedure KeepCurrentView;

Description

Memorizes current scale and position of the drawing.