anchor.diff:                  PreEndSy, TDEndSy, THEndSy, TableSy:
                     Done := True;
   
  -                  MarkSy, MarkEndSy,
  -                  TimeSy, TimeEndSy,
  -                BSy, ISy, BEndSy, IEndSy, EmSy, EmEndSy, StrongSy, StrongEndSy,
  -                  USy, UEndSy, CiteSy, CiteEndSy, VarSy, VarEndSy,
  -                  InsSy, InsEndSy, DelSy, DelEndSy,
  -                  SSy, SEndSy, StrikeSy, StrikeEndSy, SpanSy, SpanEndSy,
  -                  SubSy, SubEndSy, SupSy, SupEndSy, BigSy, BigEndSy, SmallSy, SmallEndSy,
  -                  LabelSy, LabelEndSy:
  +                MarkSy, TimeSy, BSy, ISy, StrongSy, EmSy, InsSy, DelSy,
  +                CiteSy, VarSy, USy, SSy, StrikeSy, SpanSy,
  +                SubSy, SupSy, BigSy, SmallSy, LabelSy:
                     begin
  -                    Section.AddTokenObj(S);
  -                    S.Clear;
  -                    case Sy of
  -                      MarkSy,
  -                      TimeSy,
  -                      BSy, ISy, StrongSy, EmSy, CiteSy, VarSy, USy, InsSy, DelSy, SSy, StrikeSy, SpanSy,
  -                        SubSy, SupSy, BigSy, SmallSy, LabelSy:
  -                        begin
  -                          PushNewProp(SymbToStr(Sy), Attributes.TheClass, Attributes.TheID, '', Attributes.TheTitle, Attributes.TheStyle);
  -                          Prop := TProperties(PropStack.Last);
  -                          Prop.SetFontBG;
  -                          if Prop.HasBorderStyle then {start of inline border}
  -                            PropStack.MasterList.ProcessInlines(PropStack.SIndex, Prop, True);
  -                        end;
  -                      MarkEndSy,
  -                      TimeEndSy,
  -                      BEndSy, IEndSy, StrongEndSy, EmEndSy, InsEndSy, DelEndSy, CiteEndSy, VarEndSy, UEndSy,
  -                        SEndSy, StrikeEndSy, SpanEndSy,
  -                        SubEndSy, SupEndSy, SmallEndSy, BigEndSy, LabelEndSy:
  -                        PopAProp(EndSymbToStr(Sy));
  -                    end;
  -
  +                    DoBeforeSy(SaveSy);
  +                    Prop := PropStack.Last;
  +                    Prop.SetFontBG;
  +                    if Prop.HasBorderStyle then {start of inline border}
  +                      PropStack.MasterList.ProcessInlines(PropStack.SIndex, Prop, True);
  +                    Section.ChangeFont(PropStack.Last);
  +                  end;
  +
  +                MarkEndSy, TimeEndSy, BEndSy, IEndSy, StrongEndSy, EmEndSy, InsEndSy, DelEndSy,
  +                CiteEndSy, VarEndSy, UEndSy, SEndSy, StrikeEndSy, SpanEndSy,
  +                SubEndSy, SupEndSy, BigEndSy, SmallEndSy, LabelEndSy:
  +                  begin
  +                    DoAfterEndSy(Sy);
                       Section.ChangeFont(PropStack.Last);
                     end;
   
  
positive.code:                     Section := TPreFormated.Create(PropStack.MasterList, nil, PropStack.Last,
                        CurrentUrlTarget, SectionList, False);
                    end;
                  InputSy, SelectSy:
                    begin
                      SaveSy := Sy;
                      Section.AddTokenObj(S);
                      PushNewProp(SymbToStr(Sy), Attributes.TheClass, Attributes.TheID, '', Attributes.TheTitle, Attributes.TheStyle);
                      FormControl := Section.AddFormControl(Sy, PropStack.MasterList,
                        Attributes, SectionList, TagIndex, PropStack.Last);
                      FormControl.ProcessProperties(PropStack.Last);
                      if Sy = SelectSy then
                        GetOptions(FormControl as TOptionsFormControlObj);
                      PopAProp(SymbToStr(SaveSy));
                      S.Clear; ;
                    end;
                  TextAreaSy:
                    begin
                      Section.AddTokenObj(S);
                      PushNewProp('textarea', Attributes.TheClass, Attributes.TheID, '', Attributes.TheTitle, Attributes.TheStyle);
                      TxtArea := Section.AddFormControl(TextAreaSy, PropStack.MasterList,
                        Attributes, SectionList, TagIndex, PropStack.Last) as TTextAreaFormControlObj;
                      DoTextArea(TxtArea);
                      TxtArea.ProcessProperties(PropStack.Last);
                      PopAProp('textarea');
                      S.Clear;
                    end;
                  FormSy:
                    begin
                      if InP then
  
negative.code:                     S.Clear;
                      Section.ChangeFont(PropStack.Last);
                    end;
  
                  ASy:
                    begin
                      Section.AddTokenObj(S);
                      S.Clear;
                      DoA;
                    end;
  
                  AEndSy:
                    begin
                      Section.AddTokenObj(S);
                      S.Clear;
                      DoAEnd;
                    end;
  
                  ImageSy:
                    begin
                      DoBeforeSy(SaveSy);
                      DoImage;
                      DoAfterSy(SaveSy);
                    end;
  
                  PanelSy:
                    begin
                      DoBeforeSy(SaveSy);
                      DoPanel;
                      DoAfterSy(SaveSy);
                    end;
  
                  ObjectSy:
                    begin
                      Section.AddTokenObj(S);
  