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