Using Variance in Delegates (Visual Basic) (Verwenden von Varianz in Delegaten (Visual Basic))
Wenn Sie einem Delegat eine Methode zuweisen, bieten Kovarianz und Kontravarianz Flexibilität für das Abgleichen eines Delegattyps mit einer Methodensignatur. Kovarianz lässt die Verfügung einer Methode über einen Rückgabetyp zu, der stärker abgeleitet ist als der im Delegat definierte Typ. Kontravarianz lässt eine Methode zu, die über Typen verfügt, die weniger abgeleitet sind als die im Delegattyp.
Beispiel 1: Kovarianz
Beschreibung
In diesem Beispiel wird veranschaulicht, wie Delegaten mit Methoden verwendet werden können, die über Rückgabetypen verfügen, die von den Rückgabetypen in der Delegatsignatur abgeleitet sind. Der von DogsHandler
zurückgegebene Datentyp ist vom Typ Dogs
, der vom im Delegat definierten Typ Mammals
abhängt.
Code
Class Mammals
End Class
Class Dogs
Inherits Mammals
End Class
Class Test
Public Delegate Function HandlerMethod() As Mammals
Public Shared Function MammalsHandler() As Mammals
Return Nothing
End Function
Public Shared Function DogsHandler() As Dogs
Return Nothing
End Function
Sub Test()
Dim handlerMammals As HandlerMethod = AddressOf MammalsHandler
' Covariance enables this assignment.
Dim handlerDogs As HandlerMethod = AddressOf DogsHandler
End Sub
End Class
Beispiel 2: Kontravarianz
Beschreibung
In diesem Beispiel wird veranschaulicht, wie Delegaten mit Methoden verwendet werden können, die über Parameter eines Typs verfügen, die Basistypen von den Parametertypen der Delegatsignatur sind. Mithilfe von Kontravarianz können Sie einen Ereignishandler anstelle getrennter Handler verwenden. Im folgenden Beispiel werden zwei Delegaten verwendet:
Ein KeyEventHandler-Delegat, der die Signatur des Ereignisses Button.KeyDown definiert. Die Signatur lautet:
Public Delegate Sub KeyEventHandler(sender As Object, e As KeyEventArgs)
Ein MouseEventHandler-Delegat, der die Signatur des Ereignisses Button.MouseClick definiert. Die Signatur lautet:
Public Delegate Sub MouseEventHandler(sender As Object, e As MouseEventArgs)
Das Beispiel definiert einen Ereignishandler mit einem EventArgs-Parameter und verwendet diesen, um die Ereignisse Button.KeyDown
und Button.MouseClick
zu bearbeiten. Dies ist möglich, weil EventArgs der Basistyp sowohl von KeyEventArgs als auch von MouseEventArgs ist.
Code
' Event handler that accepts a parameter of the EventArgs type.
Private Sub MultiHandler(ByVal sender As Object,
ByVal e As System.EventArgs)
Label1.Text = DateTime.Now
End Sub
Private Sub Form1_Load(ByVal sender As System.Object,
ByVal e As System.EventArgs) Handles MyBase.Load
' You can use a method that has an EventArgs parameter,
' although the event expects the KeyEventArgs parameter.
AddHandler Button1.KeyDown, AddressOf MultiHandler
' You can use the same method
' for the event that expects the MouseEventArgs parameter.
AddHandler Button1.MouseClick, AddressOf MultiHandler
End Sub