Нужна помощь. Ошибка при добавлении компонента в существующий пакет.

[srgey55]

Кто знает, подскажите. Пол дня мучаюсь.
Написал для пробы свой компонент Component->New Component - кнопка CountBtn -наследник TButton.
Вот его простой код.

unit CountBtn;

interface

uses
System.SysUtils, System.Classes, Vcl.Controls, Vcl.StdCtrls;

type
TCountBtn = class(TButton)
private
{ Private declarations }
FCount:Integer;
protected
{ Protected declarations }
procedure Click; override;
public
{ Public declarations }
procedure ShowCount;
published
{ Published declarations }
property Count:integer read FCount write FCount;
constructor Create(aowner:Tcomponent); override;
end;

procedure Register;

implementation

procedure Register;
begin
RegisterComponents('MyComponents', [TCountBtn]);
end;

{ TCountBtn }

procedure TCountBtn.Click;
begin
inherited click;
FCount:=FCount+1;
end;

constructor TCountBtn.Create(aowner: Tcomponent);
begin
inherited create(Aowner);
end;

procedure TCountBtn.ShowCount;
begin
Showmessage('По кнопке '+caption+' вы сделали: '+inttostr(FCount)+' клик(а/ов)');
end;

end.

Порядок добавления в существующий пакет (показано стрелкой) и ОШИБКА !!!!!!!!! показаны ниже на скриншотах во вложенных файлах.
Чего делать мне с этой ошибкой ? Пробовал на трех компах, везде тоже самое (((