anchor.diff:      Result := False;
   end;
   
  -function TProperties.GetClear(out Clr: ClearAttrType): Boolean;
  +function TProperties.GetClear(var Clr: ClearAttrType): Boolean;
   var
     S: ThtString;
   begin
  
positive.code:   Result := (VarIsStr(Props[OverFlow])) and (Props[OverFlow] = 'hidden');
  end;
  
  function TProperties.GetFloat(out Align: AlignmentType): Boolean;
  var
    S: ThtString;
  begin
  
negative.code:   end;
  end;
  
  function TProperties.GetBackgroundImage(var Image: ThtString): Boolean;
  begin
    if (VarIsStr(Props[BackgroundImage])) then
      if (Props[BackgroundImage] = 'none') then
  