VBNet - Форум - Динамическая обработка события с использованием...

Вопрос: Динамическая обработка события с использованием... Добавлено: 27.08.05 20:20

Автор вопроса: Ваня | Web-сайт: www.UsverSoft.narod.ru | ICQ: 193909609

Динамическая обработка события с использованием технологии отображения?

DOpenRealyForms() - массив форм

Private Sub LoadOtherFormDOpenRealyForms(ByVal sender As System.Object, ByVal e As System.EventArgs)
       ...
    End Sub

Так всё работает:

Dim D As EventHandler = AddressOf LoadOtherFormDOpenRealyForms
        Dim t As Type = DOpenRealyForms(DOpenRealyForms.GetUpperBound(0)).GetType
        Dim Events() As Reflection.EventInfo = t.GetEvents
        Dim i As Integer
        For i = 0 To Events.Length - 1
            If (Events(i).Name = "Click") Then
                Events(i).AddEventHandler(DOpenRealyForms(DOpenRealyForms.GetUpperBound(0)), D)
                Exit For
            End If

А так возникает ошибка "Object type can not be converted to target type." в выделенной строке:

Dim D As EventHandler = AddressOf LoadOtherFormDOpenRealyForms
        Dim t As Type = DOpenRealyForms(DOpenRealyForms.GetUpperBound(0)).GetType
        Dim Events() As Reflection.EventInfo = t.GetEvents
        Dim i As Integer
        For i = 0 To Events.Length - 1
            If (Events(i).Name = "LoadOtherForm") Then
               [B]Events(i).AddEventHandler(DOpenRealyForms(DOpenRealyForms.GetUpperBound(0)), D)[/B]
                Exit For
            End If
        Next i

Ответить

Ответы Всего ответов: 1

Номер ответа: 1 Автор ответа: Ваня ICQ: 193909609 Вопросов: 4 Ответов: 14	Web-сайт: www.UsverSoft.narod.ru Профиль \| \| #1	Добавлено: 27.08.05 20:25
	Ошибка происходит в этой строке: Events(i).AddEventHandler(DOpenRealyForms(DOpenRealyForms.GetUpperBound(0)), D) Хотя процедура LoadOtherForm существует и выглядит так: Public Event LoadOtherForm(ByVal sender As System.Object, ByVal e As System.EventArgs) Почему происходит эта ошибка??? Ответить

Страница: 1 |