Scale: Double;
Свойство Scale определяет масштаб рабочего пространства при печати. Свойство принимает любые положительные значения. Например, значение «0.1» соответствует 10% от натуральной величины, а значение «4» - 400% от натуральной величины.
В рассматриваемом примере предполагается существование объекта ws типа IWxWorkspace.
Sub UserProc;
Var
WS : IWxWorkspace;
PS : IWxPageSettings;
Begin
PS := ws.PageSettings;
PS.FitToPages := False;
PS.Scale := 0.5;
End Sub UserProc;
После выполнения примера будут изменены параметры страницы: при печати будет использоваться масштаб 50% от оригинального размера рабочего пространства.
См. также: