The function CircleClickMode(Ctrl: TControl; … may receive a nil Ctrl (becasue the control on which the mouse hovers has no owner).
It should read as follows:
function CircleClickMode(Ctrl: TControl; sd: TsCommonData; EventProperty: TacAnimatEvents): boolean;
begin
Result := ( Ctrl <> nil ) and (*** DB ***)
( not (csDesigning in Ctrl.ComponentState) and Ctrl.Enabled and EventEnabled(aeClick, EventProperty) and
( sd.SkinManager <> nil) and (sd.SkinManager.AnimEffects.Buttons.ClickEffect <> ceWaveOut) );
end;