[serg55]

Кто знает, подскажите. Пол дня мучаюсь.
Написал для пробы свой компонент 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.

Порядок добавления в существующий пакет (показано стрелкой) и ОШИБКА !!!!!!!!! показаны на скриншотах в моей теме вот здесь http://www.cyberforum.ru/delphi-begi...ad1242882.html
Чего делать мне с этой ошибкой ? Пробовал на трех компах, везде тоже самое (((