Index: VerpakkingsDefinitie/Main.pas =================================================================== diff -u -r589 -r591 --- VerpakkingsDefinitie/Main.pas (.../Main.pas) (revision 589) +++ VerpakkingsDefinitie/Main.pas (.../Main.pas) (revision 591) @@ -69,7 +69,6 @@ var NieuwScherm: TControl; NavGridPanelStandard: TNavGridPanelStandard; - i: Integer; begin Application.ProcessMessages; // Interrupts the execution of an application so that it can process the message queue. @@ -95,7 +94,7 @@ NavGridPanelStandard.Init(TFormGebruiker.Create(NavGridPanelStandard, Self, FAppContext, FAppContext.UserContext, FUserAgent), TFormZoekProducten.Create(NavGridPanelStandard, Self, FAppContext, FProductsAgent), TFormGevondenProducten.Create(NavGridPanelStandard, Self, FAppContext, FAppContext.ProductsContext, FProductsAgent), - TFormProductDetail.Create(NavGridPanelStandard, Self, FAppContext, FAppContext.ProductDetailContext)); + TFormProductDetail.Create(NavGridPanelStandard, Self, FAppContext, FAppContext.ProductVerpakkingContext)); end; NAVLOGIN: