diff --git a/src/Router4D.Utils.pas b/src/Router4D.Utils.pas index 013cfcd..5c5e044 100644 --- a/src/Router4D.Utils.pas +++ b/src/Router4D.Utils.pas @@ -22,7 +22,7 @@ type FProc: TProc; FAux : String; public - constructor Create(Owner: TComponent; Proc: TProc; Aux : String = ''); virtual; + constructor Create(Owner: TComponent; Proc: TProc; Aux : String = ''); reintroduce; class function AnonProc2NotifyEvent(Owner: TComponent; Proc: TProc; Aux : String = ''): TNotifyEvent; published procedure Event(Sender: TObject);