Index: AAPClient/UI/HomeScherm.dfm
===================================================================
diff -u -r21 -r22
--- AAPClient/UI/HomeScherm.dfm	(.../HomeScherm.dfm)	(revision 21)
+++ AAPClient/UI/HomeScherm.dfm	(.../HomeScherm.dfm)	(revision 22)
@@ -30,4 +30,9 @@
     TabOrder = 4
     WordWrap = True
   end
+  inherited alAlgemeen: TActionList
+    inherited actAfsluiten: TAction
+      OnExecute = actAfsluitenExecute
+    end
+  end
 end
Index: AAPClient/UI/HomeScherm.pas
===================================================================
diff -u -r21 -r22
--- AAPClient/UI/HomeScherm.pas	(.../HomeScherm.pas)	(revision 21)
+++ AAPClient/UI/HomeScherm.pas	(.../HomeScherm.pas)	(revision 22)
@@ -12,6 +12,7 @@
     btnHernoemPallet: TButton;
     btnAfmeldenProducten: TButton;
     procedure FormShow(Sender: TObject);
+    procedure actAfsluitenExecute(Sender: TObject);
   private
     { Private declarations }
   public
@@ -25,6 +26,12 @@
 
 {$R *.dfm}
 
+procedure TfmHomeScherm.actAfsluitenExecute(Sender: TObject);
+begin
+  inherited;
+  //
+end;
+
 procedure TfmHomeScherm.FormShow(Sender: TObject);
 begin
   actLinksOnder := actAfsluiten;
Index: AAPClient/UI/PalletScherm.dfm
===================================================================
diff -u -r19 -r22
--- AAPClient/UI/PalletScherm.dfm	(.../PalletScherm.dfm)	(revision 19)
+++ AAPClient/UI/PalletScherm.dfm	(.../PalletScherm.dfm)	(revision 22)
@@ -2,4 +2,12 @@
   Caption = 'fmPalletScherm'
   PixelsPerInch = 96
   TextHeight = 19
+  inherited alAlgemeen: TActionList
+    inherited actVolgende: TAction
+      OnExecute = actVolgendeExecute
+    end
+    inherited actHome: TAction
+      OnExecute = actHomeExecute
+    end
+  end
 end
Index: AAPClient/UI/DrieKnoppenScherm.pas
===================================================================
diff -u -r21 -r22
--- AAPClient/UI/DrieKnoppenScherm.pas	(.../DrieKnoppenScherm.pas)	(revision 21)
+++ AAPClient/UI/DrieKnoppenScherm.pas	(.../DrieKnoppenScherm.pas)	(revision 22)
@@ -56,14 +56,17 @@
   btnCentraalOnder.Images := fImagesScherm.ilAlgemeen32;
   btnRechtsOnder.Images := fImagesScherm.ilAlgemeen32;
   
-  if btnLinksOnder.Action <> nil then begin
+  if actLinksOnder<>nil then begin
     btnLinksOnder.Visible := true;
+    btnLinksOnder.Caption := actLinksOnder.Caption;
   end;
-  if btnCentraalOnder.Action <> nil then begin
+  if actCentraalOnder<>nil then begin
     btnCentraalOnder.Visible := true;
+    btnCentraalOnder.Caption := actCentraalOnder.Caption;
   end;
-  if btnRechtsOnder.Action <> nil then begin
+  if actRechtsOnder<>nil then begin
     btnRechtsOnder.Visible := true;
+    btnRechtsOnder.Caption := actRechtsOnder.Caption;
   end;
 
   if lblGebruiker.Caption <> '' then begin
Index: AAPClient/UI/PalletScherm.pas
===================================================================
diff -u -r21 -r22
--- AAPClient/UI/PalletScherm.pas	(.../PalletScherm.pas)	(revision 21)
+++ AAPClient/UI/PalletScherm.pas	(.../PalletScherm.pas)	(revision 22)
@@ -10,6 +10,8 @@
 type
   TfmPalletScherm = class(TfmDrieKnoppenScherm)
     procedure FormShow(Sender: TObject);
+    procedure actHomeExecute(Sender: TObject);
+    procedure actVolgendeExecute(Sender: TObject);
   private
     { Private declarations }
   public
@@ -23,6 +25,18 @@
 
 {$R *.dfm}
 
+procedure TfmPalletScherm.actHomeExecute(Sender: TObject);
+begin
+  inherited;
+  //
+end;
+
+procedure TfmPalletScherm.actVolgendeExecute(Sender: TObject);
+begin
+  inherited;
+  //
+end;
+
 procedure TfmPalletScherm.FormShow(Sender: TObject);
 begin
   actCentraalOnder := actHome;