Event<TNotifyEvent>.Clear causes AV when close app

[Big Banng]

I'm using Delphi 10.1 Berlin update 2.

There is 3 events:

procedure TForm2.Event1(Sender: TObject); begin ShowMessage('Event1'); end;

procedure TForm2.Event2(Sender: TObject); begin ShowMessage('Event2'); end;

procedure TForm2.Event3(Sender: TObject); begin ShowMessage('Event3'); end;

MultiCastEvents := Event<TNotifyEvent>.Create;

MultiCastEvents.Add(Event1); MultiCastEvents.Add(Event2); MultiCastEvents.Add(Event3);

MultiCastEvents.Clear; //Add this , then click Button8. There is Access Violation when clost app.

Button8.OnClick := MultiCastEvents.Invoke;

[Stefan Glienke]

Duplicate of #243.