Index: VerpakkingsDefinitie/ApplicationContext.pas
===================================================================
diff -u -r582 -r585
--- VerpakkingsDefinitie/ApplicationContext.pas	(.../ApplicationContext.pas)	(revision 582)
+++ VerpakkingsDefinitie/ApplicationContext.pas	(.../ApplicationContext.pas)	(revision 585)
@@ -287,7 +287,7 @@
   Namen := TList<String>.Create();
   for ProductVerpakkingTeZoeken in FProductVerpakkingen do
   begin
-    if ProductVerpakkingTeZoeken.Equals(ProductVerpakking) then
+    if not ProductVerpakkingTeZoeken.Equals(ProductVerpakking) then
       Namen.Add(intToStr(ProductVerpakkingTeZoeken.CutOrder) + ': ' + ProductVerpakkingTeZoeken.MetaCaption)
   end;
 
@@ -297,7 +297,7 @@
 // Product verpakking
 function TProductVerpakking.Equals(Obj: TObject): Boolean;
 begin
-  if Obj <> nil then
+  if Obj = nil then
     Result := false
   else if not(Obj is TProductVerpakking) then
     Result := false