Index: AAPClient/UI/PalletScherm.pas
===================================================================
diff -u -r240 -r241
--- AAPClient/UI/PalletScherm.pas	(.../PalletScherm.pas)	(revision 240)
+++ AAPClient/UI/PalletScherm.pas	(.../PalletScherm.pas)	(revision 241)
@@ -39,7 +39,7 @@
 procedure TfmPalletScherm.actHomeExecute(Sender: TObject);
 begin
   inherited;
-  (Self.Parent.Parent.Parent As TfmProScanHoofdscherm).NavigeerNaar(mrHome);
+  (Self.Parent.Parent As TfmProScanHoofdscherm).NavigeerNaar(mrHome);
 end;
 
 procedure TfmPalletScherm.actVolgendeExecute(Sender: TObject);
@@ -83,7 +83,7 @@
   end else begin
     Self.ModalResult := mrPallet;
   end;
-  (Self.Parent.Parent.Parent As TfmProScanHoofdscherm).NavigeerNaar(Self.ModalResult);
+  (Self.Parent.Parent As TfmProScanHoofdscherm).NavigeerNaar(Self.ModalResult);
 end;
 
 procedure TfmPalletScherm.btnGenereerTbpClick(Sender: TObject);