diff --git a/components/tvplanit/examples/navbar/unit1.lfm b/components/tvplanit/examples/navbar/unit1.lfm
index c857e0a55..988674b79 100644
--- a/components/tvplanit/examples/navbar/unit1.lfm
+++ b/components/tvplanit/examples/navbar/unit1.lfm
@@ -17,7 +17,7 @@ object Form1: TForm1
     AllowRearrange = True
     BackgroundColor = clInactiveCaption
     BackgroundMethod = bmTile
-    BorderStyle = bsSingle
+    BorderStyle = bsNone
     ButtonHeight = 20
     DrawingStyle = dsEtchedButton
     FolderCollection = <    
diff --git a/components/tvplanit/source/vpnavbar.pas b/components/tvplanit/source/vpnavbar.pas
index 92334e918..718f72ded 100644
--- a/components/tvplanit/source/vpnavbar.pas
+++ b/components/tvplanit/source/vpnavbar.pas
@@ -1108,10 +1108,8 @@ procedure TVpCustomNavBar.ItemChanged(FolderIndex, ItemIndex: Integer);
 begin
   Invalidate;
 //  InvalidateItem(FolderIndex, ItemIndex);
-  (*
   if not (csDestroying in ComponentState) then
     RecreateWnd{$IFDEF LCL}(self){$ENDIF};
-    *)
 end;
 {=====}
 
@@ -1119,10 +1117,8 @@ procedure TVpCustomNavBar.FolderChanged(FolderIndex: Integer);
 begin
   Unused(FolderIndex);
   Invalidate;
-  (*
   if not (csDestroying in ComponentState) then
     RecreateWnd{$IFDEF LCL}(self){$ENDIF};
-   *)
 end;
 {=====}