Проблема с collectioneditor

---

У меня есть индивидуальная коллекция, которая иногда используется во время разработки.
Кутомизированные классы, которые я хочу добавить (а также удалить) в классы, имеют события, которые должны быть собраны в моей коллекции, а также переданы за пределы этой коллекции.

Если я работаю с частью времени выполнения, все работает так, как я хочу, потому что мои методы Add - и Remove-могут добавлять и удалять обработчики.

Во время разработки я предполагал, что метод OnInsertComplete вызывается при нажатии кнопки Add-редактора - это работает косвенно.
Также я предположил, что метод OnRemove или OnRemoveComplete вызывается при нажатии кнопки Remove редактора-но этого никогда не происходит.

Поэтому я подумал о обходе, который ловит метод-делегат события Click-кнопки Remove, удаляет этот делегат из кнопки и заменяет его моим собственным методом, который вызывает OnRemove в коллекции, вызывает сохраненный делегат и после этого вызывает OnRemoveComplete коллекции.

И вот тут-то я и застрял.
Я могу получить Eventinfo из кнопки, я могу сделать MethodInfo ... но я не могу получить от него делегата.

Что я уже пробовал:

Public Class RMCollectionEditor
    Inherits CollectionEditor

    Public Sub New(ByVal type As System.Type)
        MyBase.New(type)
    End Sub

    Protected Overrides Function CreateCollectionForm() As CollectionEditor.CollectionForm
        Dim cForm As CollectionForm = MyBase.CreateCollectionForm()

        Dim myButton() As Control

         ' Remove-Button
        myButton = cForm.Controls.Find("removeButton", True)
        If myButton.Length > 0 Then
  
            Dim myEventInfo As System.Reflection.EventInfo = GetType(Button).GetEvent("Click", Reflection.BindingFlags.NonPublic Or BindingFlags.Public Or Reflection.BindingFlags.Instance)

            Dim myInfo As System.Reflection.MethodInfo = myEventInfo.GetAddMethod(True)
            RepeatDelegate = [Delegate].CreateDelegate(GetType(delegate_OnClick), myInfo, False)
            RemoveHandler myButton(0).Click, [Delegate].CreateDelegate(GetType(delegate_OnClick), myInfo, False)
            AddHandler myButton(0).Click, AddressOf RemoveButton_Handler

        End If

         Return cForm
    End Function


     Private Sub RemoveButton_Handler(sender As Object, e As EventArgs)
        MessageBox.Show("Remove")
     End Sub

End Class

Было бы здорово, если бы кто-нибудь помог мне сделать следующий шаг ...

---