diff --git a/components/synedit/syntextdrawer.pp b/components/synedit/syntextdrawer.pp
index dd2f1a5d93..e438ace35d 100644
--- a/components/synedit/syntextdrawer.pp
+++ b/components/synedit/syntextdrawer.pp
@@ -403,7 +403,7 @@ begin
   result := 0;
   for item := low (TFontStyle) to high(TFontStyle) do
     if item in Value then
-      result := result + 1 shr ord(item);
+      result := result + 1 shl ord(item);
 end;
 {$ENDIF}