diff --git a/lcl/include/buttonglyph.inc b/lcl/include/buttonglyph.inc
index 964fb97a3e..3069d99597 100644
--- a/lcl/include/buttonglyph.inc
+++ b/lcl/include/buttonglyph.inc
@@ -140,7 +140,7 @@ begin
   FOriginal.Assign(Value);
   FOriginal.OnChange := @GlyphChanged;
   FNumGlyphs := 1;
-  if (FOriginal <> nil) and (FOriginal.Height > 0) then
+  if FOriginal.Height > 0 then
   begin
     if FOriginal.Width mod FOriginal.Height = 0 then
     begin