anchor.diff:              FrameSet.SendToBack;
               FrameSet.Visible := True;
               MasterSet.FrameViewer.ParseFrame(FrameSet, Doc, Source, FrameSet.HandleMeta);
  -            Self.BevelOuter := bvNone;
  +{$ifndef LCL}
  +            BevelOuter := bvNone;
  +{$endif}
               frBumpHistory1(Source, 0);
               with FrameSet do
               begin
  
positive.code:             BevelOuter := bvLowered;
              BevelWidth := MasterSet.BorderSize;
            end;
            if (Dest <> '') then
              Viewer.PositionTo(Dest);
          end;
  
negative.code:           end;
          if Assigned(Viewer) then
          begin
  {$ifndef LCL}
            if MasterSet.BorderSize = 0 then
              BevelOuter := bvNone
            else
  