Notifier-Subscription-List robustness
This commit is contained in:
@@ -32,7 +32,6 @@ type
|
||||
strict private
|
||||
FSubscribers: TMycNotifyList<TSignal.ISubscriber>;
|
||||
function GetSignal: TSignal;
|
||||
function GetIsSet: Boolean;
|
||||
public
|
||||
constructor Create;
|
||||
destructor Destroy; override;
|
||||
@@ -197,11 +196,6 @@ begin
|
||||
inherited;
|
||||
end;
|
||||
|
||||
function TMycEvent.GetIsSet: Boolean;
|
||||
begin
|
||||
Result := true;
|
||||
end;
|
||||
|
||||
function TMycEvent.GetSignal: TSignal;
|
||||
begin
|
||||
Result := Self;
|
||||
|
||||
Reference in New Issue
Block a user