anchor.diff:      if (Tag = 'td') or (Tag = 'th') then
         OldSize := DefPointSize
       else
  -  {$ENDIF}if (VarType(Props[FontSize]) = VarDouble) and (Props[FontSize] > 0.0) then {should be true}
  +  {$ENDIF}if (VarType(Props[FontSize]) in VarNum) and (Props[FontSize] > 0.0) then {should be true}
           OldSize := Props[FontSize]
         else
           OldSize := DefPointSize;
  
positive.code:     end;
  
    {process the entries in Styles to see if they are contextual selectors}
      MergeContextuals(Tag + ' ');
      if AClass <> '' then
        MergeContextuals('.' + AClass + ' ');
      if PSeudo <> '' then
        MergeContextuals(':' + PSeudo + ' ');
      if AnID <> '' then
        MergeContextuals('#' + AnID + ' ');
  
      if AProp <> nil then //the Style= attribute
        Merge(AProp);
  
      if not ((VarType(Props[FontSize]) = VarDouble) or
        (VarType(Props[FontSize]) in varInt)) then {if still a string, hasn't been converted}
        Props[FontSize] := FontSizeConv(Props[FontSize], OldSize);
    end;
  
  
negative.code:   Auto = -12348765;
    AutoParagraph = -12348766;
    ParagraphSpace = 14; {default spacing between paragraphs, etc.}
    
  {$IFDEF Delphi6_Plus}
    varInt = [varInteger, varByte, varSmallInt, varShortInt, varWord, varLongWord];
    varFloat = [varSingle, varDouble, varCurrency];
  {$ELSE}
    varInt = [varInteger];
    varFloat = [varSingle, varDouble];
  {$ENDIF}
    varNum = varInt + varFloat;
  
    EastEurope8859_2 = 31; {for 8859-2}
    CRLF = #$D#$A;
  
  