Index: VerpakkingsDefinitie/UI/ProductDetailScherm.pas =================================================================== diff -u -r606 -r622 --- VerpakkingsDefinitie/UI/ProductDetailScherm.pas (.../ProductDetailScherm.pas) (revision 606) +++ VerpakkingsDefinitie/UI/ProductDetailScherm.pas (.../ProductDetailScherm.pas) (revision 622) @@ -64,11 +64,11 @@ inherited Create(AOwner, Navigator, ApplicationContext); self.FProductsContextSubject := ProductsContextSubject; - self.FProductsContextSubjectObserver := TSubjectObserver.Create(self); + self.FProductsContextSubjectObserver := TSubjectObserver.Create(); self.FProductsContextSubjectObserver.OnChange := UpdateGuiProduct; self.FVerpakkingenContextSubject := VerpakkingContextSubject; - self.FVerpakkingenContextSubjectObserver := TSubjectObserver.Create(self); + self.FVerpakkingenContextSubjectObserver := TSubjectObserver.Create(); self.FVerpakkingenContextSubjectObserver.OnChange := UpdateGuiVerpakkingen; self.FProductsAgent := ProductsAgent;