Index: AAPClient/UI/HomeScherm.dfm
===================================================================
diff -u -r20 -r21
--- AAPClient/UI/HomeScherm.dfm	(.../HomeScherm.dfm)	(revision 20)
+++ AAPClient/UI/HomeScherm.dfm	(.../HomeScherm.dfm)	(revision 21)
@@ -4,7 +4,6 @@
   TextHeight = 19
   inherited btnLinksOnder: TButton
     Action = nil
-    ImageIndex = 1
   end
   inherited btnCentraalOnder: TButton
     Visible = False
Index: AAPClient/Win32/Debug/ProScan.exe
===================================================================
diff -u -r19 -r21
Binary files differ
Index: AAPClient/Win32/Debug/DrieKnoppenScherm.dcu
===================================================================
diff -u -r15 -r21
Binary files differ
Index: AAPClient/UI/PalletScherm.pas
===================================================================
diff -u -r19 -r21
--- AAPClient/UI/PalletScherm.pas	(.../PalletScherm.pas)	(revision 19)
+++ AAPClient/UI/PalletScherm.pas	(.../PalletScherm.pas)	(revision 21)
@@ -9,6 +9,7 @@
 
 type
   TfmPalletScherm = class(TfmDrieKnoppenScherm)
+    procedure FormShow(Sender: TObject);
   private
     { Private declarations }
   public
@@ -22,4 +23,14 @@
 
 {$R *.dfm}
 
+procedure TfmPalletScherm.FormShow(Sender: TObject);
+begin
+  actCentraalOnder := actHome;
+  actRechtsOnder := actVolgende;
+  btnCentraalOnder.Action := actHome;
+  btnRechtsOnder.Action := actVolgende;
+  inherited;
+
+end;
+
 end.
Index: AAPClient/Win32/Debug/ProScanMain.dcu
===================================================================
diff -u -r19 -r21
Binary files differ
Index: AAPClient/UI/DrieKnoppenScherm.pas
===================================================================
diff -u -r15 -r21
--- AAPClient/UI/DrieKnoppenScherm.pas	(.../DrieKnoppenScherm.pas)	(revision 15)
+++ AAPClient/UI/DrieKnoppenScherm.pas	(.../DrieKnoppenScherm.pas)	(revision 21)
@@ -56,17 +56,14 @@
   btnCentraalOnder.Images := fImagesScherm.ilAlgemeen32;
   btnRechtsOnder.Images := fImagesScherm.ilAlgemeen32;
   
-  if actLinksOnder<>nil then begin
+  if btnLinksOnder.Action <> nil then begin
     btnLinksOnder.Visible := true;
-    btnLinksOnder.Caption := actLinksOnder.Caption;
   end;
-  if actCentraalOnder<>nil then begin
+  if btnCentraalOnder.Action <> nil then begin
     btnCentraalOnder.Visible := true;
-    btnCentraalOnder.Caption := actCentraalOnder.Caption;
   end;
-  if actRechtsOnder<>nil then begin
+  if btnRechtsOnder.Action <> nil then begin
     btnRechtsOnder.Visible := true;
-    btnRechtsOnder.Caption := actRechtsOnder.Caption;
   end;
 
   if lblGebruiker.Caption <> '' then begin
Index: AAPClient/UI/HomeScherm.pas
===================================================================
diff -u -r20 -r21
--- AAPClient/UI/HomeScherm.pas	(.../HomeScherm.pas)	(revision 20)
+++ AAPClient/UI/HomeScherm.pas	(.../HomeScherm.pas)	(revision 21)
@@ -28,6 +28,7 @@
 procedure TfmHomeScherm.FormShow(Sender: TObject);
 begin
   actLinksOnder := actAfsluiten;
+  btnLinksOnder.Action := actAfsluiten;
   inherited;
 end;