Не обрабатывается нажатие на компонент

[bulldog5293]

А название книги не подскажешь? Просто выдаёт не актуальный пораметр

[Stilet]

Подскажу: http://yandex.ua/yandsearch?text=%D0...oc=10&lr=20554

[bulldog5293]

Вообщем и это не помогло, то что там описано опять же мне машет шляпой. Если исходить из того что написано в этой литературе то получается так

TSetNbutonsGroup1 = class(TCustomControl)
  private
    Fbutons: TNbutonsGroup;
    procedure Setbutons(const Value: TNbutonsGroup);
    protected
    procedure Paint; override;
  public
    constructor Create(AOwner: TComponent); override;
    destructor Destroy; override;
    procedure Assign(Source: TPersistent); override;
  published
    property Canvas;
    property butons: TNbutonsGroup read Fbutons write Setbutons;
    property Items[Index: Integer]: TbutonsItem read GetItem write SetItem; default;
  end;


procedure TMyComponent.Assign(Source: TPersistent);
begin
  if Source is TMyComponent then
  begin
    Items := TMyComponent(Source).Items;
    ButtonHeight := TButtonGroup(Source).ButtonHeight;
    ButtonWidth := TButtonGroup(Source).ButtonWidth;
    ButtonOptions := TButtonGroup(Source).ButtonOptions;
  end
  else
    inherited;
end;

Тогда получается что у меня динамический массив итемов которые не имеют права так существовать