3 files changed, 23 insertions, 12 deletions
diff --git a/src/corelib/fpg_main.pas b/src/corelib/fpg_main.pas
index f5f2a844..24e57fee 100644
--- a/src/corelib/fpg_main.pas
+++ b/src/corelib/fpg_main.pas
@@ -2059,6 +2059,7 @@ begin
     Exit; //==>
   end;
 
+  { Clear the rectangle with a color }
   ACanvas.SetColor(clButtonFace);
   ACanvas.SetLineStyle(1, lsSolid);
   ACanvas.FillRectangle(x, y, w, h);
@@ -2085,14 +2086,6 @@ begin
   ACanvas.DrawLine(r.Left, r.Bottom, r.Left, r.Top);  // left
   ACanvas.DrawLine(r.Left, r.Top, r.Right, r.Top);    // top
 
-  // Left and Top (inner)
-  //if btnIsPressed in AFlags then
-  //begin
-    //ACanvas.SetColor(clShadow1);
-    //ACanvas.DrawLine(x + 1, y + h - 3, x + 1, y + 1);  // left
-    //ACanvas.DrawLine(x + 1, y + 1, x + w - 2, y + 1);  // top
-  //end;
-
   // Right and Bottom (outer)
   if (btfIsPressed in AFlags) then
   begin
@@ -2118,7 +2111,7 @@ begin
   ACanvas.DrawLine(r.Right, r.Bottom, r.Left-1, r.Bottom);   // bottom
 
   if (btfFlat in AFlags) or (btfHover in AFlags) then
-    exit; { "toolbar" style buttons need a nice thing/flat border }
+    exit; { "toolbar" style buttons need a nice thin/flat border }
 
   // Right and Bottom (inner)
   if btfIsPressed in AFlags then
diff --git a/src/corelib/predefinedcolors.inc b/src/corelib/predefinedcolors.inc
index ddb333b9..a16a4974 100644
--- a/src/corelib/predefinedcolors.inc
+++ b/src/corelib/predefinedcolors.inc
@@ -40,8 +40,8 @@
   clWindowBackground    = TfpgColor(cl_BaseNamedColor + 1);
   clBoxColor            = TfpgColor(cl_BaseNamedColor + 2);
   clButtonFace          = TfpgColor(cl_BaseNamedColor + 3);
-  clShadow1             = TfpgColor(cl_BaseNamedColor + 4); // nice for disabled text
-  clShadow2             = TfpgColor(cl_BaseNamedColor + 5); // $80000005;
+  clShadow1             = TfpgColor(cl_BaseNamedColor + 4); // nice for disabled text  { light shadow }
+  clShadow2             = TfpgColor(cl_BaseNamedColor + 5); // $80000005;              { dark shadow }
   clHilite1             = TfpgColor(cl_BaseNamedColor + 6); // $80000006;
   clHilite2             = TfpgColor(cl_BaseNamedColor + 7); // $80000007;
   clText1               = TfpgColor(cl_BaseNamedColor + 8); // $80000008;    // normal text
diff --git a/src/gui/fpg_style_win2k.pas b/src/gui/fpg_style_win2k.pas
index 70ae4e0f..7ed12dd7 100644
--- a/src/gui/fpg_style_win2k.pas
+++ b/src/gui/fpg_style_win2k.pas
@@ -1,4 +1,21 @@
-unit fpg_style_win2k; 
+{
+    fpGUI  -  Free Pascal GUI Toolkit
+
+    Copyright (C) 2006 - 2011 See the file AUTHORS.txt, included in this
+    distribution, for details of the copyright.
+
+    See the file COPYING.modifiedLGPL, included in this distribution,
+    for details about redistributing fpGUI.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+    Description:
+      Implements the Windows 2000 look. Simple and functional without
+      distractions.
+}
+unit fpg_style_win2k;
 
 {$mode objfpc}{$H+}
 
@@ -10,6 +27,7 @@ uses
   ;
 
 type
+
   TfpgWin2000Style = class(TfpgStyle)
 
   end;