anchor.diff:      property TitleAttr: string read FTitleAttr;
       property TitleHistory: TStrings read FTitleHistory;
       property URL: string read FURL write FURL;
  +    property ViewerState: THtmlViewerState read FViewerState;
       property VScrollBarPosition: Integer read GetScrollPos write SetScrollPos;
       property VScrollBarRange: Integer read GetScrollBarRange;
  -
     published
       property Enabled;
       property TabStop;
  
positive.code:   Result := NumPrinterPages(Dummy);
  end;
  
  function THtmlViewer.NumPrinterPages(var WidthRatio: Double): Integer;
  var
    MFPrinter: TMetaFilePrinter;
  begin
  
negative.code:     function MakeMetaFile(YTop, FormatWidth, Width, Height: Integer): TMetaFile;
      function MakePagedMetaFiles(Width, Height: Integer): TList;
  {$endif}
      function NumPrinterPages(out WidthRatio: Double): Integer; overload;
      function NumPrinterPages: Integer; overload;
      function PositionTo(Dest: string): Boolean;
      function PrintPreview(MFPrinter: TMetaFilePrinter; NoOutput: Boolean = False): Integer; virtual;
  