Создал наследника tlabel. В Create пишу
inherited Create(AOwner);
наследую все свойства.
далее caption:='123';
а можно ли теперь както из инспектора объектов убрать caption у нового компонента или сделать его r\o?
т.е. как после наследования свойств старого компонента (и их изменения) скрыть их из испектора объектов (как будто их и небыло).

еще подскажите пожалуйста, в этом же примере - никак не пойму как у этого компонента написть например событие onclick, т.е. нужно чтобы допустим сначала показывался showmessage при этом событии, а затем выполнялась бы стандартная обработка inherited;

Удалено модератором

Удалено модератором

Удалено модератором

Удалено модератором

Удалено модератором

Удалено модератором

Для того чтобы скрыть свойства в инспекторе, нужно для него зарегистрировать редактор типа NIL

Перекройте метод DoClick.

1. RegisterPropertyEditor(TypeInfo(String), TMyLabel, 'Caption', NIL);
вставляю в DT bpl перед
RegisterComponents('My', [TMyLabel]);
что то не работает, все ли верно?

2. что то у лабела я метода DoClick не вижу...

ага, первая зафурычила так  
RegisterPropertyEditor(TypeInfo(TCaption), TGuLabelTime, 'Caption', NIL);

2 пока актуально