anchor.diff:    Panel: TAppPanelItem;
     Num: integer;
     bExist: boolean;
  +  Ctl: TCustomControl;
   begin
     Num:= CaptionToPanelIndex(ACaption);
     bExist:= Num>=0;
  
positive.code:     ItemModule: string;
      ItemMethod: string;
      ItemOnShow: TNotifyEvent;
      procedure InitControl(const ACaption: string; AForm: TCustomForm; AParent: TWinControl);
    end;
  
  type
  
negative.code:   end;
  
    if AHandle<>0 then
    begin
      Ctl:= TCustomControl(AHandle);
  
      Panel.ItemCaption:= ACaption;
      Panel.ItemControl:= Ctl;
      Panel.ItemModule:= '';
      Panel.ItemMethod:= '';
  
      Ctl.Parent:= PanelGrouper;
      Ctl.Align:= alClient;
      if Ctl is TCustomForm then
        TCustomForm(Ctl).BorderStyle:= bsNone;
    end;
  
    if not bExist then
    begin
  