anchor.diff:    BackgroundColor := fpgColor(51,51,51); // black/brown or should be use clShadow2 for theming abilities??
     OnShow         := @FormShow;
   
  +  FPreviewMargin := 10;
  +
     CreateReportImages;
   
     Bv_Command     := CreateBevel(Self, 0, 0, Width, 50, bsBox, bsRaised);
  
positive.code:     end;
  end;
  
  procedure TF_Visu.E_NumPageKeyPress(Sender: TObject; var KeyCode: word; var ShiftState: TShiftState; var Consumed: Boolean);
  var
    CptSect, CptPage, CptPageSect: integer;
  
negative.code:   public
      constructor Create(AOwner: TComponent; AImprime: T_Report); reintroduce;
      destructor Destroy; override;
      property PreviewMargin: integer read FPreviewMargin write SetPreviewMargin;
    end;
  
  var
  