Index: AAPClient/UI/HomeScherm.pas
===================================================================
diff -u -r240 -r241
--- AAPClient/UI/HomeScherm.pas	(.../HomeScherm.pas)	(revision 240)
+++ AAPClient/UI/HomeScherm.pas	(.../HomeScherm.pas)	(revision 241)
@@ -35,25 +35,25 @@
 procedure TfmHomeScherm.actAfsluitenExecute(Sender: TObject);
 begin
   inherited;
-  (Self.Parent.Parent.Parent As TfmProScanHoofdscherm).NavigeerNaar(mrLogin);
+  (Self.Parent.Parent As TfmProScanHoofdscherm).NavigeerNaar(mrLogin);
 end;
 
 procedure TfmHomeScherm.btnAfmeldenProductenClick(Sender: TObject);
 begin
   inherited;
-  (Self.Parent.Parent.Parent As TfmProScanHoofdscherm).NavigeerNaar(mrPallet);
+  (Self.Parent.Parent As TfmProScanHoofdscherm).NavigeerNaar(mrPallet);
 end;
 
 procedure TfmHomeScherm.btnHernoemPalletClick(Sender: TObject);
 begin
   inherited;
-  (Self.Parent.Parent.Parent As TfmProScanHoofdscherm).NavigeerNaar(mrHernoemPallet);
+  (Self.Parent.Parent As TfmProScanHoofdscherm).NavigeerNaar(mrHernoemPallet);
 end;
 
 procedure TfmHomeScherm.btnUitloggenClick(Sender: TObject);
 begin
   inherited;
-  (Self.Parent.Parent.Parent As TfmProScanHoofdscherm).NavigeerNaar(mrLogin);
+  (Self.Parent.Parent As TfmProScanHoofdscherm).NavigeerNaar(mrLogin);
 end;
 
 end.