|
@@ -422,7 +422,6 @@ begin
|
|
|
FDefaultPrevented:=True;
|
|
|
end;
|
|
|
|
|
|
-{ TFresnelEventDispatcher }
|
|
|
Type
|
|
|
|
|
|
{ TFresnelRegistry }
|
|
@@ -438,6 +437,8 @@ begin
|
|
|
Result:=MaxFresnelEvents+1;
|
|
|
end;
|
|
|
|
|
|
+{ TFresnelEventDispatcher }
|
|
|
+
|
|
|
class function TFresnelEventDispatcher.CreateFresnelRegistry: TEventRegistry;
|
|
|
begin
|
|
|
Result:=TFresnelRegistry.Create;
|