Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.05.22;
Скачать: CL | DM;

Вниз

Почему published свойство не появляется в инспекторе?   Найти похожие ветки 

 
Deus   (2003-05-11 16:07) [0]

Почему published свойство не появляется в инспекторе? Нужен перехват выхода мышки со спидбатона. Если в form.create прописать myspeedbutton.onmouseleave:=myprocedure, то всё работает. Хотелось бы таки в дизайнере это делать, бо батонов много, иногда количество/имена меняются, следить за всем тяжело - потенциальные ошибки. Код:

type
TMySpeedButton = class(tspeedButton)
private
FOnMouseLeave: TNotifyEvent;
procedure CMMouseLeave(var Message: TMessage); message CM_MOUSELEAVE;
protected
public
published
property OnMouseLeave: TNotifyEvent read FOnMouseLeave write FOnMouseLeave;
end;

procedure Register;

implementation

procedure Register;
begin
RegisterComponents("Samples", [TMySpeedButton]);
end;

procedure TMySpeedButton.CMMouseLeave(var Message: TMessage);
begin
inherited;
if Assigned(FOnMouseLeave) then
FOnMouseLeave(Self);
end;

end.


 
Deus   (2003-05-12 14:26) [1]

Злравствуйте всем! Так таки кто-нибудь что-нибудь скажет, вопрос, вероятно, очень простой. Хоть чайником обзовите, да пошлите rtfm. Только, плиз, скажите к каким конретно f***ing manual.


 
MBo ©   (2003-05-12 15:44) [2]

могу предположить, что ты не перекомпилировал пакет, в котором установлен твой компонент (скорее всего, dclusr60 или как он там у тебя в D6 называется)



Страницы: 1 вся ветка

Текущий архив: 2003.05.22;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.027 c
11-70199
zetta
2002-08-16 18:19
2003.05.22
а почему бы не сделать как в вцл?


14-70445
4you
2003-05-02 11:04
2003.05.22
Новые библиотеки


1-70264
User
2003-05-12 13:39
2003.05.22
Своё событие?


3-70185
Filat
2003-05-02 16:35
2003.05.22
FireBird - SYSDBA. А можно для клиента без последнего?


3-70143
Lion
2003-04-30 15:45
2003.05.22
FoxPro и Делфи !