TdxCustomDrawPageEvent = procedure(Sender: TObject; AReportLink: TBasedxReportLink; ACanvas: TCanvas; APageIndex: Integer; ARect: TRect; ANom: Integer; ADenom: Integer) of object;