Index: VerpakkingsDefinitie/UI/GevondenProductenScherm.pas
===================================================================
diff -u -r591 -r592
--- VerpakkingsDefinitie/UI/GevondenProductenScherm.pas	(.../GevondenProductenScherm.pas)	(revision 591)
+++ VerpakkingsDefinitie/UI/GevondenProductenScherm.pas	(.../GevondenProductenScherm.pas)	(revision 592)
@@ -23,7 +23,7 @@
     FProductsAgent: TProductsAgent;
     procedure UpdateGui(Sender: TObject);
   public
-    Constructor Create(AOwner: TComponent; Navigator: TFormMain; ApplicationContext: TApplicationContext;
+    Constructor Create(AOwner: TComponent; Navigator: INavigator; ApplicationContext: TApplicationContext;
       ProductSubject: TSubject; ProductsAgent: TProductsAgent);
   end;
 
@@ -33,7 +33,7 @@
 
 uses SelectService;
 
-constructor TFormGevondenProducten.Create(AOwner: TComponent; Navigator: TFormMain; ApplicationContext: TApplicationContext;
+constructor TFormGevondenProducten.Create(AOwner: TComponent; Navigator: INavigator; ApplicationContext: TApplicationContext;
   ProductSubject: TSubject; ProductsAgent: TProductsAgent);
 begin
   inherited Create(AOwner, Navigator, ApplicationContext);