anchor.diff:  constructor THTMLViewer.Create(AOwner: TComponent);
   begin
     inherited Create(AOwner);
  -  ControlStyle := [csAcceptsControls, csCaptureMouse, csClickEvents,
  -    csSetCaption, csDoubleClicks];
  +  ControlStyle := [csAcceptsControls, csCaptureMouse, csClickEvents, csSetCaption, csDoubleClicks];
  +  Include(FViewerState, vsCreating);
     Height := 150;
     Width := 150;
     SetCursor(crIBeam);
  
positive.code:       if GetTickCount > Ticks + 100 then
        begin
          Ticks := GetTickCount;
          if LeftButtonDown then
          begin
            if Pt.Y < -15 then
              Pos := Position - Integer(SmallChange * 8)
  
negative.code:     FVisitedMaxCount: integer;
      FBackGround: TColor;
      FFontSize: integer;
  // These fields are set in SubmitForm and read in WMFormSubmit
      FAction, FFormTarget, FEncType, FMethod: string;
      FStringList: TStringList;
  