diff --git a/lcl/graphtype.pp b/lcl/graphtype.pp
index 54e297bb36..42db413dde 100644
--- a/lcl/graphtype.pp
+++ b/lcl/graphtype.pp
@@ -33,8 +33,8 @@ type
   TGraphicsColor = -$7FFFFFFF-1..$7FFFFFFF;
   TGraphicsFillStyle =
   (
-    fsSurface, // fill till the color (it fills all execpt this color)
-    fsBorder   // fill this color (it fills only conneted pixels of this color)
+    fsSurface, // fill till the color (it fills all except this color)
+    fsBorder   // fill this color (it fills only connected pixels of this color)
   );
   TGraphicsBevelCut =
   (