anchor.diff:    if Style = bsRaised then
       Canvas.SetColor(clHilite2)
     else
  -    Canvas.SetColor(clShadow2);
  +    Canvas.SetColor(clShadow1);
   
     if FPanelBorder = bsSingle then
     begin
  
positive.code:   else
      Canvas.SetLineStyle(2, lsSolid);
  
    if FPanelBorder = bsSingle then
      Canvas.DrawLine(0, 0, Width - 1, 0)
    else
      Canvas.DrawLine(0, 1, Width - 1, 1);
  
    if FPanelBorder = bsSingle then
      Canvas.DrawLine(0, 1, 0, Height - 1)
    else
      Canvas.DrawLine(1, 1, 1, Height - 1);
  
    if Style = bsRaised then
      Canvas.SetColor(clShadow2)
    else
      Canvas.SetColor(clHilite2);
  
    Canvas.DrawLine(Width - 1, 0, Width - 1, Height - 1);
    Canvas.DrawLine(0, Height - 1, Width, Height - 1);
  end;
  
negative.code:   end;
  
    if Style = bsRaised then
      Canvas.SetColor(clShadow1)
    else
      Canvas.SetColor(clHilite2);
  
  