diff --git a/Source/Cliente/Utiles/uMenuUtils.pas b/Source/Cliente/Utiles/uMenuUtils.pas
index f31420e7..74f7c6f9 100644
--- a/Source/Cliente/Utiles/uMenuUtils.pas
+++ b/Source/Cliente/Utiles/uMenuUtils.pas
@@ -31,7 +31,10 @@ var
 begin
   for I := 0 to Source.Count - 1 do
   begin
-    Item := Dest.Find(Source.Items[I].Caption);
+    Item := NIL;
+    if Source.Items[I].Caption <> '-' then
+      Item := Dest.Find(Source.Items[I].Caption);
+      
     if Item = NIL then
     begin
       Item := TMenuItem.Create(Dest);