anchor.diff:  
   { TAppSidePanel }
   
  -procedure TAppSidePanel.InitForm(const ACaption: string; AForm: TCustomControl; AParent: TWinControl);
  +procedure TAppSidePanel.InitControl(const ACaption: string; AControl: TCustomControl; AParent: TWinControl);
   begin
     ItemCaption:= ACaption;
  -  ItemControl:= AForm;
  +  ItemControl:= AControl;
     ItemModule:= '';
     ItemMethod:= '';
   
  -  AForm.BorderStyle:= bsNone;
  -  AForm.Parent:= AParent;
  -  AForm.Align:= alClient;
  +  AControl.BorderStyle:= bsNone;
  +  AControl.Parent:= AParent;
  +  AControl.Align:= alClient;
   end;
   
   { TAppPanelHost }
  
positive.code:     ItemModule: string;
      ItemMethod: string;
      ItemOnShow: TNotifyEvent;
      procedure InitForm(const ACaption: string; AForm: TCustomControl;
        AParent: TWinControl);
    end;
  
  
negative.code:   end;
  
    if AHandle<>0 then
      Panel.InitControl(ACaption, TCustomForm(AHandle), ParentPanel);
  
    if not bExist then
    begin
  