30-11-12, 10:25 PM
السلام عليكم و رحمة الله و بركاته،
[SIZE=5][SIZE=4]كيف أت[SIZE=4]حكم في ترتيب الـEvent Handlers ؟أنا ع[SIZE=4]ندي [SIZE=4]في [SIZE=4]المشروع صورة شبيهة بتلك:[/SIZE][/SIZE][/SIZE][/SIZE][/SIZE][/SIZE]
كود :
[SIZE=4]Public Class Class1
Public Event Event1(ByVal e As System.EventArgs)
Protected Sub OnEvent1(ByVal e As System.EventArgs) Handles Me.Event1
MsgBox("Default Protected Handler")
End Sub
Public Sub RaiseEvent1()
RaiseEvent Event1(EventArgs.Empty)
End Sub
End Class
Public Class Class2
Public Sub HandleEvent1(ByRef itsClass As Class1)
AddHandler itsClass.Event1, AddressOf Event1Handler
End Sub
Public Sub Event1Handler(ByVal e As System.EventArgs)
MsgBox("Recently added Handler")
End Sub
End Class
Public Module Module1
Public Sub Main()
Dim myClass1 As New Class1
Dim myClass2 As New Class2
myClass2.HandleEvent1(myClass1)
myClass1.RaiseEvent1()
End
End Sub
End Module[/SIZE]
[/SIZE][SIZE=4]في الكود أعلاه، [SIZE=4]أريد تفعيل [SIZE=4]الـHandler الذي به الرسالة: "Recently added Handler" قبل الـHandler الذي به الرسالة: "Default Protected Handler"[/SIZE][/SIZE]
(مع مراعاة عدم تغيير كود Class1)
[/SIZE]