MAV писал(а):
(не увидел плюсов)перестанут работать одноименные события на элементах схемы. Правильно делать так:
#pas
if assigned(_event_onMouseEnter.event) then
onMouseEnter := _onMouseEnter;
if assigned(_event_onMouseLeave.event) then
onMouseLeave := _onMouseLeave;