Megjegyzés
Az oldalhoz való hozzáféréshez engedély szükséges. Megpróbálhat bejelentkezni vagy módosítani a címtárat.
Az oldalhoz való hozzáféréshez engedély szükséges. Megpróbálhatja módosítani a címtárat.
Amikor metódust rendel egy delegálthoz, a kovariancia és kontravariancia rugalmasságot biztosít a delegált típus illesztése a metódus aláírásához. A kovariancia lehetővé teszi, hogy egy metódus olyan visszatérési típussal rendelkezzen, amely származtatottabb, mint a delegáltban definiált. A contravariance olyan metódust engedélyez, amely a delegált típushoz képest kevésbé származtatott paramétertípusokkal rendelkezik.
1. példa: Kovariancia
Leírás
Ez a példa bemutatja, hogyan használhatók a delegátusok olyan metódusokkal, amelyek a delegátus aláírás visszatérési típusából származtatott visszatérési típussal rendelkeznek. A DogsHandler visszaadott adattípus típusa Dogs, ami a delegáltban definiált Mammals típusból származik.
Kód
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
2. példa: Kontravariancia
Leírás
Ez a példa bemutatja, hogyan használhatók a delegáltak olyan metódusokkal, amelyek olyan paraméterekkel rendelkeznek, amelyek típusa a delegált aláírás paramétertípus alaptípusa. A contravariance használatával külön kezelők helyett egy eseménykezelőt használhat. Az alábbi példa két meghatalmazottat használ:
A KeyEventHandlerButton.KeyDown esemény aláírását meghatározó meghatalmazott. Aláírása:
Public Delegate Sub KeyEventHandler(sender As Object, e As KeyEventArgs)A MouseEventHandlerButton.MouseClick esemény aláírását meghatározó meghatalmazott. Aláírása:
Public Delegate Sub MouseEventHandler(sender As Object, e As MouseEventArgs)
A példa egy EventArgs paraméterrel rendelkező eseménykezelőt határoz meg, és azt használja mind a Button.KeyDown , mind a Button.MouseClick események kezelésére. Ez azért lehetséges, mert EventArgs mind KeyEventArgs, mind MouseEventArgs alap típusa.
Kód
' 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