Index: VerpakkingsDefinitie/UI/GevondenProductenScherm.pas =================================================================== diff -u -r589 -r591 --- VerpakkingsDefinitie/UI/GevondenProductenScherm.pas (.../GevondenProductenScherm.pas) (revision 589) +++ VerpakkingsDefinitie/UI/GevondenProductenScherm.pas (.../GevondenProductenScherm.pas) (revision 591) @@ -59,22 +59,22 @@ begin if (Selected = false) or (Item = nil) or (Item.Data = nil) then exit; - ApplicationContext.ProductDetailContext.GeselecteerdProduct := Item.Data; + ApplicationContext.ProductsContext.GeselecteerdProduct := Item.Data; // ApplicationContext.ProductDetailContext.NotifyChanged(); FProductsAgent.ZoekProductDataMetProductNr(TProductInformatie(Item.Data).ProductNr, self.ApplicationContext.UserContext, - self.ApplicationContext.ProductDetailContext); + self.ApplicationContext.ProductVerpakkingContext); - if self.ApplicationContext.ProductDetailContext.IsOK = false then + if self.ApplicationContext.ProductVerpakkingContext.IsOK = false then begin // Opzoeking gefaald - ErrorMessage := self.ApplicationContext.ProductDetailContext.ErrorMessage; - if self.ApplicationContext.ProductDetailContext.InternalErrorMessage <> '' then + ErrorMessage := self.ApplicationContext.ProductVerpakkingContext.ErrorMessage; + if self.ApplicationContext.ProductVerpakkingContext.InternalErrorMessage <> '' then begin - ErrorMessage := ErrorMessage + sLineBreak + self.ApplicationContext.ProductDetailContext.InternalErrorMessage; + ErrorMessage := ErrorMessage + sLineBreak + self.ApplicationContext.ProductVerpakkingContext.InternalErrorMessage; end; MessageDlg(ErrorMessage, TMsgDlgType.mtInformation, [mbOK], 0, mbCancel); - self.ApplicationContext.ProductDetailContext.Reset(); + self.ApplicationContext.ProductVerpakkingContext.Reset(); end; end; @@ -101,7 +101,7 @@ ListViewProducten.Items.EndUpdate; // Bij opnieuw inladen is de selectie verloren gegaan. - self.ApplicationContext.ProductDetailContext.Reset(); + self.ApplicationContext.ProductVerpakkingContext.Reset(); end; end.