anchor.diff:      I: TShortHand;
     begin
       for I := Low(TShortHand) to High(TShortHand) do
  -      if S = ShortHands[I] then
  +      if S = PropWords[I] then
         begin
           Result := True;
           Index := I;
  
positive.code: implementation
  
  const
    ShortHands: array[Low(TShortHand)..High(TShortHand)] of ThtString = (
      'margin', 'padding', 'border-width', 'border',
      'border-top', 'border-right', 'border-bottom', 'border-left',
      'font', 'background', 'list-style', 'border-color',
      'border-style');
  
  const
    NeedPound = True;
  
  //-- BG ---------------------------------------------------------- 26.12.2010 --
  
negative.code: 
  {---------  Detect Shorthand syntax }
  type
  //  TShortHand = (
  //    MarginX, PaddingX, BorderWidthX, BorderX,
  //    BorderTX, BorderRX, BorderBX, BorderLX,
  //    FontX, BackgroundX, ListStyleX, BorderColorX,
  //    BorderStyleX);
  
    EParseError = class(Exception);
  
  