Index: VerpakkingsDefinitie/UI/Subscherm.pas =================================================================== diff -u -r549 -r550 --- VerpakkingsDefinitie/UI/Subscherm.pas (.../Subscherm.pas) (revision 549) +++ VerpakkingsDefinitie/UI/Subscherm.pas (.../Subscherm.pas) (revision 550) @@ -18,12 +18,12 @@ property ApplicationContext: TApplicationContext Read fApplicationContext write fApplicationContext; - Constructor Create(AOwner: TComponent; ApplicationContext: TApplicationContext); overload; + Constructor Create(AOwner: TComponent; var ApplicationContext: TApplicationContext); overload; end; implementation -constructor TFormSubscherm.Create(AOwner: TComponent; ApplicationContext: TApplicationContext); +constructor TFormSubscherm.Create(AOwner: TComponent; var ApplicationContext: TApplicationContext); begin inherited Create(AOwner);