Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Добавление событий [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...)


Наверх

Титульная страница Поиск, карта сайта Написать письмо