Event sender, event source and event original source : Event « Windows Presentation Foundation « VB.Net






Event sender, event source and event original source

Event sender, event source and event original source
     

<Window x:Class="RoutedEvents.BubbledLabelClick"
    xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
    xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
    Title="BubbledLabelClick" Height="360" Width="330" MouseUp="SomethingClicked" >
    <StackPanel MouseUp="SomethingClicked">
      <Label Margin="5" BorderThickness="1" MouseUp="SomethingClicked" HorizontalAlignment="Left" >
        <StackPanel MouseUp="SomethingClicked" >
          <TextBlock Margin="3" MouseUp="SomethingClicked">label</TextBlock>
          <Image Source="c:\image.jpg" Stretch="None" MouseUp="SomethingClicked" />
          <TextBlock Margin="3" MouseUp="SomethingClicked">test</TextBlock>
        </StackPanel>
      </Label>
      <ListBox Margin="5" Name="lstMessages" Grid.Row="1"></ListBox>
      <CheckBox Margin="5" Name="chkHandle">Handle first event</CheckBox>
      <Button Click="cmdClear_Click" HorizontalAlignment="Right" Margin="5" Padding="3">Clear List</Button>
    </StackPanel>
</Window>
//File:Window.xaml.vb


Imports System
Imports System.Collections.Generic
Imports System.Text
Imports System.Windows
Imports System.Windows.Controls
Imports System.Windows.Data
Imports System.Windows.Documents
Imports System.Windows.Input
Imports System.Windows.Media
Imports System.Windows.Media.Imaging
Imports System.Windows.Shapes

Namespace RoutedEvents
  Public Partial Class BubbledLabelClick
    Inherits System.Windows.Window

    Public Sub New()
      InitializeComponent()
    End Sub

    Protected eventCounter As Integer = 0

    Private Sub SomethingClicked(sender As Object, e As RoutedEventArgs)
      eventCounter += 1
      Dim message As String = "#" & eventCounter.ToString() & ":" & vbCr & vbLf & " Sender: " & sender.ToString() & vbCr & vbLf & " Source: " & Convert.ToString(e.Source) & vbCr & vbLf & " Original Source: " & Convert.ToString(e.OriginalSource)
      lstMessages.Items.Add(message)
      e.Handled = CBool(chkHandle.IsChecked)
    End Sub

    Private Sub cmdClear_Click(sender As Object, e As RoutedEventArgs)
      eventCounter = 0
      lstMessages.Items.Clear()
    End Sub
  End Class
End Namespace

   
    
    
    
    
  








Related examples in the same category

1.Get event sender from eventGet event sender from event
2.Handle the ContentRendered eventHandle the ContentRendered event
3.Find source element of an element in event handler by castingFind source element of an element in event handler by casting
4.Add an event handler to an element using codeAdd an event handler to an element using code
5.Halting event routing with HandledHalting event routing with Handled
6.Security ExceptionSecurity Exception
7.Throw Handled ExceptionThrow Handled Exception
8.Check handler event senderCheck handler event sender
9.Do event based on button nameDo event based on button name
10.Add event handler to StackPanel in StackPanel resourceAdd event handler to StackPanel in StackPanel resource
11.Add a PropertyChangedValueCallback to Any Dependency PropertyAdd a PropertyChangedValueCallback to Any Dependency Property
12.Handle a Button Click with Shared button click handlerHandle a Button Click with Shared button click handler
13.DispatcherTimer and EventHandlerDispatcherTimer and EventHandler
14.Thumb DragStarted and DragCompleted event handlerThumb DragStarted and DragCompleted event handler
15.Set interval and event handler for DispatcherTimerSet interval and event handler for DispatcherTimer
16.Get the event sender nameGet the event sender name
17.Event firing sequenceEvent firing sequence
18.Cancel event by setting CanExecute and Handled to falseCancel event by setting CanExecute and Handled to false
19.Cast event sender to a controlCast event sender to a control
20.Fire an event when an element gains and loses focus.Fire an event when an element gains and loses focus.