Скачать: CL | DM;

Печему нельзя присвоить TControl.OnMouseMove?   Найти похожие ветки 

← →
ZHK ©   (2004-06-02 16:23) [0]

В принципе вопрос заключен в теме. Что делаю? Да вот так:


C:=TTabSheet.Create(PageControl1);
LoadComponentFromFile(OpenDialog1.FileName,C,fs);
C.Controls[J].OnMouseMove:=ControlMouseMove;
C.Controls[J].OnMouseDown:=ControlMouseDown;
C.Controls[J].PopupMenu:=PopupMenu1;


Проседура LoadComponentFromFile загружает компонент из текстового файла. Она работает без вопросов. А при попытке даже компиляции, OnMouseMove, как оказывается - неверный идентификатор. Почему так?

---

← →
Гаврила ©   (2004-06-02 16:28) [1]

Потому что у TControl она protected

---

← →
Семен Сорокин ©   (2004-06-02 16:30) [2]

OnMouseMove - объявлен в protected-секции TControl"а
сделай так

type
 TExControl = class(TControl);

...
TExControl(C.Controls[J]).OnMouseMove:=ControlMouseMove;

---

← →
ZHK ©   (2004-06-02 18:18) [3]

Я понял. Спасибо. Благодарен.

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.022 c