diff --git a/lcl/include/menuitem.inc b/lcl/include/menuitem.inc
index e95f43f004..e4081fc734 100644
--- a/lcl/include/menuitem.inc
+++ b/lcl/include/menuitem.inc
@@ -101,6 +101,8 @@ begin
   FCommand := UniqueCommand;
   FImageIndex := -1;
   FBitmapIsValid := True;
+  FRightJustify := False;
+  FShowAlwaysCheckable := False;
 
   FImageChangeLink := TChangeLink.Create;
   FImageChangeLink.OnChange := @ImageListChange;
diff --git a/lcl/menus.pp b/lcl/menus.pp
index 0e022f3c09..014813322c 100644
--- a/lcl/menus.pp
+++ b/lcl/menus.pp
@@ -258,11 +258,11 @@ type
                                            stored IsImageIndexStored default -1;
     property RadioItem: Boolean read FRadioItem write SetRadioItem
                                 default False;
-    property RightJustify: boolean read FRightJustify write SetRightJustify;
+    property RightJustify: boolean read FRightJustify write SetRightJustify default False;
     property ShortCut: TShortCut read FShortCut write SetShortCut
                                  stored IsShortCutStored default 0;
     property ShowAlwaysCheckable: boolean read FShowAlwaysCheckable
-                                          write SetShowAlwaysCheckable;
+                                 write SetShowAlwaysCheckable default False;
     property SubMenuImages: TCustomImageList read FSubMenuImages
                                              write SetSubMenuImages;
     property Visible: Boolean read FVisible write SetVisible