Index: VerpakkingsDefinitie/UI/Subscherm.pas
===================================================================
diff -u -r557 -r558
--- VerpakkingsDefinitie/UI/Subscherm.pas	(.../Subscherm.pas)	(revision 557)
+++ VerpakkingsDefinitie/UI/Subscherm.pas	(.../Subscherm.pas)	(revision 558)
@@ -13,18 +13,18 @@
 type
   TFormSubscherm = class(TForm)
   private
-    FNavigator: TFormMain;
+    FNavigator: INavigator;
     FApplicationContext: TApplicationContext;
   protected
-    property Navigator: TFormMain Read FNavigator write FNavigator;
+    property Navigator: INavigator Read FNavigator write FNavigator;
     property ApplicationContext: TApplicationContext Read FApplicationContext write FApplicationContext;
   public
-    Constructor Create(AOwner: TComponent; Navigator: TFormMain; ApplicationContext: TApplicationContext);
+    Constructor Create(AOwner: TComponent; Navigator: INavigator; ApplicationContext: TApplicationContext);
   end;
 
 implementation
 
-constructor TFormSubscherm.Create(AOwner: TComponent; Navigator: TFormMain; ApplicationContext: TApplicationContext);
+constructor TFormSubscherm.Create(AOwner: TComponent; Navigator: INavigator; ApplicationContext: TApplicationContext);
 begin
   inherited Create(AOwner);