Index: VerpakkingsDefinitie/UI/VerpakkingDetailScherm.pas
===================================================================
diff -u -r603 -r604
--- VerpakkingsDefinitie/UI/VerpakkingDetailScherm.pas	(.../VerpakkingDetailScherm.pas)	(revision 603)
+++ VerpakkingsDefinitie/UI/VerpakkingDetailScherm.pas	(.../VerpakkingDetailScherm.pas)	(revision 604)
@@ -292,6 +292,8 @@
 procedure TFormVerpakkingDetail.RegistreerWijzigingenVerpakking(ProductVerpakking: TProductVerpakking);
 var
   I: Integer;
+  ParameterControl: TCustomPanelVerpakkingParameter;
+  VerpakkingParameters: TList<TProductVerpakkingParameter>;
 begin
   // Linkerhelft
 
@@ -340,6 +342,22 @@
   // OptiType, geslecteerde tekst vertalen naar code en instellen.
   ProductVerpakking.OptiType := ApplicationContext.UiInstellingenContext.OptiTypesByValue
     [ComboBoxOptiType.Items[ComboBoxOptiType.ItemIndex]];
+
+  // Rechterhelft
+
+  // Parameters. De controls in de scrollbox overlopen, op zoek naar TCustomPanelVerpakkingParameter.
+  // Eenmaal die gevonden forceren we het updaten van het object met de ingegeven waarde.
+  // Deze ge�pdate ProductVerpakkingParameter voegen we toe aan een temp lijst.
+  // Deze lijst registreren we bij de verpakking.
+  VerpakkingParameters := TList<TProductVerpakkingParameter>.Create();
+  for I := 0 to ScrollBoxParameters.ControlCount - 1 do
+    if (ScrollBoxParameters.Controls[I] is TCustomPanelVerpakkingParameter) then
+    begin
+      ParameterControl := TCustomPanelVerpakkingParameter(ScrollBoxParameters.Controls[I]);
+      ParameterControl.Opslaan();
+      VerpakkingParameters.Add(ParameterControl.ProductVerpakkingParameter);
+    end;
+  ProductVerpakking.SetParameters(VerpakkingParameters);
 end;
 
 procedure TFormVerpakkingDetail.UpdateControlsEnableStatus();