anchor.diff:  
     ControlStyle := ControlStyle - [csAcceptsControls] + [csOwnedChildrenNotSelectable];
   
  -  FTopPanel := TPanel.Create(Self);
  -  FTopPanel.Parent := Self;
  -  with FTopPanel do
  -  begin
  -    Align := alTop;
  -    BevelOuter := bvNone;
  -    Height := 40;
  -
  -    FTopPanelRight := TPanel.Create(Self);
  -    FTopPanelRight.Parent := FTopPanel;
  -    with FTopPanelRight do
  -    begin
  -      BevelOuter := bvNone;
  -      Align := alRight;
  -      Height := 40;
  -      Width := 177;
  -
  -      FSearchLabel := TLabel.Create(Self);
  -      FSearchLabel.Parent := FTopPanelRight;
  -      with FSearchLabel do
  -      begin
  -        Left := 7;
  -        Top := 13;
  -        Width := 37;
  -        Height := 13;
  -        Caption := 'Search:';
  -      end;
  -
  -      FSearchEdit := TEdit.Create(Self);
  -      FSearchEdit.Parent := FTopPanelRight;
  -      with FSearchEdit do
  -      begin
  -        Left := 50;
  -        Top := 10;
  -        Width := 121;
  -        Height := 21;
  -      end;
  -    end;
  -  end;
  -
     FBottomPanel := TPanel.Create(Self);
     FBottomPanel.Parent := Self;
     with FBottomPanel do
  
positive.code:     end;
    end;
  
    {FClientPanel := TPanel.Create(Self);
    FClientPanel.Parent := Self;
    with FClientPanel do
  
negative.code:   protected { component interface part }
      FSearchLabel: TLabel;
      FSearchEdit: TEdit;
      FSearchButton: TButton;
      FTopPanel: TPanel;
      FTopPanelRight: TPanel;
      //FClientPanel: TPanel;
  