diff --git a/Packages/X2CLMenuBarEditor.pas b/Packages/X2CLMenuBarEditor.pas
index 966193e..ef37e55 100644
--- a/Packages/X2CLMenuBarEditor.pas
+++ b/Packages/X2CLMenuBarEditor.pas
@@ -120,13 +120,13 @@ end;
 
 procedure TfrmMenuBarEditor.FormCreate(Sender: TObject);
 begin
-  {$IFDEF VER180}
+  {$IF CompilerVersion >= 18}
   // Delphi (BDS) 2006
   tbMenu.EdgeBorders  := [];
   tbMenu.DrawingStyle := dsGradient;
   {$ELSE}
   tbMenu.Flat         := True;
-  {$ENDIF}
+  {$IFEND}
 end;