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

Язык Visual Basic на платформе .NET.

Модераторы: Ramzes, Sebas

Ваня
Новичок
Новичок
 
Сообщения: 27
Зарегистрирован: 24.06.2005 (Пт) 22:23
Откуда: Московская обл., д. Нестерово

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

Сообщение Ваня » 27.08.2005 (Сб) 19:40

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

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
        Next i



А так:
Код: Выделить всё
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
               Events(i).AddEventHandler(DOpenRealyForms(DOpenRealyForms.GetUpperBound(0)), D)
                Exit For
            End If         
        Next i


возникает ошибка "Object type can not be converted to target type." в строке Events(i).AddEventHandler(DOpenRealyForms(DOpenRealyForms.GetUpperBound(0)), D)

Хотя процедура LoadOtherForm существует и выглядит так:
Код: Выделить всё
Public Event LoadOtherForm(ByVal sender As System.Object, ByVal e As System.EventArgs)


Почему происходит эта ошибка???

Вернуться в Visual Basic .NET

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 51

    TopList