![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Добавление событий [D6, Win2k]
ErmSergey © (2002-08-23 14:46:00)Создал класс наследник TCustomRichEdit и добавил событие. Но оно не отображается в Object Inspector"е. Почему?
Юрий Зотов (2002-08-23 23:22:00) [1]> имя долно начинаться на On...
Не имеет значения. Просто так принято, не более.
> ErmSergey
Смотрел-смотрел, ничего подозрительного не увидел. Должно расти. Попробуйте перекомпилировать пакет.
Если у этого класса предполагаются наследники, советую ввести еще и метод диспетчеризации события. Это не обязательно, но грамотно. Пример - тот же метод MouseMove. Класс-наследник может заместить метод диспетчеризации и тем самым встроить в цепочку обработки события свой код без риска повлиять на остальную функциональность (точно так же, как Вы это сделали и сами, заместив MouseMove).
ErmSergey (2002-08-23 14:51:00) [2]Вот как все выглядит:
type
TOnWordEvent = procedure(Sender: TObject; Word: string) of object;
TAdvRichEdit = class(TRichEdit)
private
{ Private declarations }
FOnWord: TOnWordEvent;
protected
{ Protected declarations }
public
{ Public declarations }
procedure MouseMove(Shift: TShiftState; X, Y: Integer);override;
published
{ Published declarations }
property OnWord: TOnWordEvent read FOnWord write FOnWord;
end;
Reindeer Moss Eater (2002-08-23 14:48:00) [3]Должно быть в секции published, имя долно начинаться на On...
lenin (2002-08-23 14:48:00) [4]А ты его установил? (Component->Install Component...)