zsPageWidth error

rbuser

This code worked in the Delphi 6 and RB 6

procedure TBomiReport.rbBomiPreviewFormCreate(Sender: Tobject);
begin
rbBomi.PreviewForm.WindowState := wsMaximized;
TppViewer(rbBomi.PreviewFrom.Viewer).ZoomSetting := zsPageWidth;
end;

I now get this error:

E2003 Undeclared identifier : 'zsPageWidth'


TIA

rbuser

added ppTypes to uses clause and problem is fixed.