Index: AAPClient/UI/DrieKnoppenScherm.dfm
===================================================================
diff -u -r182 -r183
--- AAPClient/UI/DrieKnoppenScherm.dfm	(.../DrieKnoppenScherm.dfm)	(revision 182)
+++ AAPClient/UI/DrieKnoppenScherm.dfm	(.../DrieKnoppenScherm.dfm)	(revision 183)
@@ -146,7 +146,7 @@
     end
   end
   object alAlgemeen: TActionList
-    Images = ImagesScherm.ilAlgemeen48
+    Images = ImagesScherm.ilAlgemeen128
     Left = 24
     Top = 48
     object actVolgende: TAction
@@ -189,7 +189,7 @@
     object actAfronden: TAction
       Category = 'Algemeen'
       Caption = 'Afronden'
-      ImageIndex = 9
+      ImageIndex = 17
     end
   end
 end
Index: AAPClient/UI/DnaCodeScherm.dfm
===================================================================
diff -u -r181 -r183
--- AAPClient/UI/DnaCodeScherm.dfm	(.../DnaCodeScherm.dfm)	(revision 181)
+++ AAPClient/UI/DnaCodeScherm.dfm	(.../DnaCodeScherm.dfm)	(revision 183)
@@ -184,8 +184,8 @@
   inherited alAlgemeen: TActionList
     Left = 16
     Top = 160
-    inherited actVolgende: TAction
-      OnExecute = actVolgendeExecute
+    inherited actAfronden: TAction
+      OnExecute = actAfrondenExecute
     end
     inherited actHome: TAction
       OnExecute = actHomeExecute
Index: AAPClient/UI/DnaCodeScherm.pas
===================================================================
diff -u -r181 -r183
--- AAPClient/UI/DnaCodeScherm.pas	(.../DnaCodeScherm.pas)	(revision 181)
+++ AAPClient/UI/DnaCodeScherm.pas	(.../DnaCodeScherm.pas)	(revision 183)
@@ -27,7 +27,7 @@
     procedure FormShow(Sender: TObject);
     procedure actPalletExecute(Sender: TObject);
     procedure actHomeExecute(Sender: TObject);
-    procedure actVolgendeExecute(Sender: TObject);
+    procedure actAfrondenExecute(Sender: TObject);
     procedure edtDnaCodeKeyPress(Sender: TObject; var Key: Char);
     procedure FormCreate(Sender: TObject);
     procedure imgInfoClick(Sender: TObject);
@@ -62,7 +62,7 @@
   Self.ModalResult := mrPallet;
 end;
 
-procedure TfmDnaCodeScherm.actVolgendeExecute(Sender: TObject);
+procedure TfmDnaCodeScherm.actAfrondenExecute(Sender: TObject);
 var
   fWaarschuwingModalResult: TModalResult;
 begin
@@ -104,7 +104,7 @@
 begin
   btnLinksOnder.Action := actPallet;
   btnCentraalOnder.Action := actHome;
-  btnRechtsOnder.Action := actVolgende;
+  btnRechtsOnder.Action := actAfronden;
   edtDnaCode.Text := '';
   ActiveControl := edtDnaCode;
   lblHuidigePalletData.Caption := UiContext.Pallet;