![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Создание компонентов в runtime и перемещение их по форме [D5, Win95/98]
ДмитрийК. © (2002-12-11 10:38:00)Уважаемые мастера, кто сможет подсказать:
1.Есть компонент, наследник TImage как создать его в runtime, кол-во может изменяться от 5 до 30.
2.Каким образом можно прописать в своём компоненте реакцию на стандартные события OnMouseDown, OnMouseUp чтобы не прописывать их в каждом объекте.
3. Поднимаю старый вопос, перемещение компонентов по форме в runtime, какой способ посоветуете выбрать?
jen_bond (2002-12-11 11:17:00) [1]если не сложно кинь мне! Заранее спасиобо!!! killer@mail.nnov.ru
Skier (2002-12-11 10:47:00) [2]>ДмитрийК.
1. Создавай в цикле,...и можно заносить их в список (если нужно...)
2.
а)Можно в классе-наследнике перекрыть
procedure MouseDown(Button: TMouseButton; Shift: TShiftState;
X, Y: Integer); dynamic; и
procedure MouseUp(Button: TMouseButton; Shift: TShiftState;
X, Y: Integer); dynamic;
и делать свои специфичные действия
б) можно после создания экземпляра класса назначить
(и так для каждого...) одни и те обработчики
AImage1.OnMouseDown := TheSameMouseDown;
AImage1.OnMouseUp := TheSameMouseUp;
//................
AImage30.OnMouseDown := TheSameMouseDown;
AImage30.OnMouseUp := TheSameMouseUp;
3. У меня есть небольшой компонентик, который это умеет делать,
если нужно кину по почте...