Index: VerpakkingsDefinitie/UI/GevondenProductenScherm.pas =================================================================== diff -u -r563 -r565 --- VerpakkingsDefinitie/UI/GevondenProductenScherm.pas (.../GevondenProductenScherm.pas) (revision 563) +++ VerpakkingsDefinitie/UI/GevondenProductenScherm.pas (.../GevondenProductenScherm.pas) (revision 565) @@ -87,6 +87,7 @@ Product: TProductInformatie; NieuwItem: TListItem; begin + ListViewProducten.Items.Clear(); // Update with data from ApplicationContext for Product in ApplicationContext.ProductsContext.Producten do begin Index: VerpakkingsDefinitie/WS/ProductsAgent.pas =================================================================== diff -u -r563 -r565 --- VerpakkingsDefinitie/WS/ProductsAgent.pas (.../ProductsAgent.pas) (revision 563) +++ VerpakkingsDefinitie/WS/ProductsAgent.pas (.../ProductsAgent.pas) (revision 565) @@ -124,6 +124,8 @@ ProductsContext.ErrorMessage := ''; ProductsContext.InternalErrorMessage := ''; + ProductsContext.Producten.Clear(); + // Producten inladen LijnenProduct := TStringList.Create; Lijnen := GeefBruikbareLijnenUitXMLDataSet(DataSet);