Index: VerpakkingsDefinitie/ApplicationContext.pas
===================================================================
diff -u -r570 -r571
--- VerpakkingsDefinitie/ApplicationContext.pas	(.../ApplicationContext.pas)	(revision 570)
+++ VerpakkingsDefinitie/ApplicationContext.pas	(.../ApplicationContext.pas)	(revision 571)
@@ -65,6 +65,7 @@
     FInternalErrorMessage: string;
   public
     constructor Create();
+    procedure Reset();
     procedure NotifyChanged();
     property Producten: TList<TProductInformatie> read FProducten write FProducten;
 
@@ -87,7 +88,7 @@
     FInternalErrorMessage: string;
   public
     procedure NotifyChanged();
-    procedure ResetSelectie();
+    procedure Reset();
     property GeselecteerdProduct: TProductInformatie read FGeselecteerdProduct write FGeselecteerdProduct;
     property ProductDetailInformatie: OptiServerService.pxBoxData read FProductDetailInformatie write FProductDetailInformatie;
 
@@ -125,6 +126,16 @@
   FProducten := TList<TProductInformatie>.Create();
 end;
 
+// Enkel updaten wanneer nog niet op nil stond.
+procedure TProductsContext.Reset();
+begin
+  if FProducten.Count > 0 then
+  begin
+    FProducten.Clear();
+    NotifyChanged();
+  end;
+end;
+
 function TProductInformatie.GetOmschrijving1(): string;
 var
   S: string;
@@ -174,7 +185,7 @@
 end;
 
 // Enkel updaten wanneer nog niet op nil stond.
-procedure TProductDetailContext.ResetSelectie();
+procedure TProductDetailContext.Reset();
 begin
   if (GeselecteerdProduct <> nil) or (ProductDetailInformatie <> nil) then
   begin