Nasıl yapılır: ICommandSource Uygulama
Bu örnekte, uygulanarak bir komut kaynağının nasıl ICommandSource oluşturulmalıdır? Komut kaynağı, komut çağırmayı bilen bir nesnedir. Arabirim ICommandSource üç üyeyi gösterir:
- Command: çağrılan komut.
- CommandParameter: komut kaynağından komutun işlandığı yönteme geçirilen kullanıcı tanımlı bir veri türü.
- CommandTarget: komutun yürütültülür olduğu nesne.
Bu örnekte, denetimden devralan ve arabirimi Slider uygulayan bir sınıf ICommandSource oluşturulur.
Örnek
WPF, , ve gibi ICommandSource uygulayan bir Button dizi sınıf MenuItemHyperlink sağlar. Komut kaynağı, bir komutu nasıl çağıran bir komut tanımlar. Bu sınıflar tıklandırıldıklarında bir komut çağırır ve yalnızca kendi özellikleri ayarlanırken bir Command komut kaynağı haline gelirler.
Bu örnekte, kaydırıcı taşındığında veya daha doğru bir şekilde özellik değiştiriken komutunu Value çağırabilirsiniz.
Sınıf tanımı aşağıdaki şekildedir:
public class CommandSlider : Slider, ICommandSource
{
public CommandSlider() : base()
{
}
Public Class CommandSlider
Inherits Slider
Implements ICommandSource
Public Sub New()
MyBase.New()
End Sub
Sonraki adım üyeleri uygulamak ICommandSource olacak. Bu örnekte, özellikler nesneler olarak DependencyProperty uygulanır. Bu, özelliklerin veri bağlamayı kullanmalarını sağlar. sınıfı hakkında daha fazla DependencyProperty bilgi için bkz. DependencyProperty Veri bağlama hakkında daha fazla bilgi için bkz. Veri Bağlamaya Genel Bakış.
Burada Command yalnızca özelliği gösterilir.
// Make Command a dependency property so it can use databinding.
public static readonly DependencyProperty CommandProperty =
DependencyProperty.Register(
"Command",
typeof(ICommand),
typeof(CommandSlider),
new PropertyMetadata((ICommand)null,
new PropertyChangedCallback(CommandChanged)));
public ICommand Command
{
get
{
return (ICommand)GetValue(CommandProperty);
}
set
{
SetValue(CommandProperty, value);
}
}
' Make Command a dependency property so it can use databinding.
Public Shared ReadOnly CommandProperty As DependencyProperty =
DependencyProperty.Register("Command", GetType(ICommand),
GetType(CommandSlider),
New PropertyMetadata(CType(Nothing, ICommand),
New PropertyChangedCallback(AddressOf CommandChanged)))
Public ReadOnly Property Command1() As ICommand Implements ICommandSource.Command
Get
Return CType(GetValue(CommandProperty), ICommand)
End Get
End Property
Public Property Command() As ICommand
Get
Return CType(GetValue(CommandProperty), ICommand)
End Get
Set(ByVal value As ICommand)
SetValue(CommandProperty, value)
End Set
End Property
Değişiklik geri çağırma DependencyProperty aşağıdaki şekildedir:
// Command dependency property change callback.
private static void CommandChanged(DependencyObject d,
DependencyPropertyChangedEventArgs e)
{
CommandSlider cs = (CommandSlider)d;
cs.HookUpCommand((ICommand)e.OldValue,(ICommand)e.NewValue);
}
' Command dependency property change callback.
Private Shared Sub CommandChanged(ByVal d As DependencyObject, ByVal e As DependencyPropertyChangedEventArgs)
Dim cs As CommandSlider = CType(d, CommandSlider)
cs.HookUpCommand(CType(e.OldValue, ICommand), CType(e.NewValue, ICommand))
End Sub
Sonraki adım, komut kaynağıyla ilişkili komutu eklemek ve kaldırmaktır. Yeni bir komut ekleniyorsa özelliğin üzerine yazılamaz çünkü önceki komutla ilişkili olay işleyicileri Command (varsa) önce kaldırılması gerekir.
// Add a new command to the Command Property.
private void HookUpCommand(ICommand oldCommand, ICommand newCommand)
{
// If oldCommand is not null, then we need to remove the handlers.
if (oldCommand != null)
{
RemoveCommand(oldCommand, newCommand);
}
AddCommand(oldCommand, newCommand);
}
// Remove an old command from the Command Property.
private void RemoveCommand(ICommand oldCommand, ICommand newCommand)
{
EventHandler handler = CanExecuteChanged;
oldCommand.CanExecuteChanged -= handler;
}
// Add the command.
private void AddCommand(ICommand oldCommand, ICommand newCommand)
{
EventHandler handler = new EventHandler(CanExecuteChanged);
canExecuteChangedHandler = handler;
if (newCommand != null)
{
newCommand.CanExecuteChanged += canExecuteChangedHandler;
}
}
' Add a new command to the Command Property.
Private Sub HookUpCommand(ByVal oldCommand As ICommand, ByVal newCommand As ICommand)
' If oldCommand is not null, then we need to remove the handlers.
If oldCommand IsNot Nothing Then
RemoveCommand(oldCommand, newCommand)
End If
AddCommand(oldCommand, newCommand)
End Sub
' Remove an old command from the Command Property.
Private Sub RemoveCommand(ByVal oldCommand As ICommand, ByVal newCommand As ICommand)
Dim handler As EventHandler = AddressOf CanExecuteChanged
RemoveHandler oldCommand.CanExecuteChanged, handler
End Sub
' Add the command.
Private Sub AddCommand(ByVal oldCommand As ICommand, ByVal newCommand As ICommand)
Dim handler As New EventHandler(AddressOf CanExecuteChanged)
canExecuteChangedHandler = handler
If newCommand IsNot Nothing Then
AddHandler newCommand.CanExecuteChanged, canExecuteChangedHandler
End If
End Sub
Sonraki adım, işleyici için mantık CanExecuteChanged oluşturmaktır.
Olay, CanExecuteChanged komut kaynağına komutun geçerli komut hedefi üzerinde yürütülebilme yeteneğinin değişmiş olduğunu bildirdi. Bir komut kaynağı bu olayı aldığında genellikle CanExecute komutunda yöntemini arar. Komut geçerli komut hedefi üzerinde yürütülenene kadar yürütülenene kadar komut kaynağı genellikle kendisini devre dışı bıraktır. Komut geçerli komut hedefi üzerinde yürütüle ise, komut kaynağı genellikle kendisini etkinleştirir.
private void CanExecuteChanged(object sender, EventArgs e)
{
if (this.Command != null)
{
RoutedCommand command = this.Command as RoutedCommand;
// If a RoutedCommand.
if (command != null)
{
if (command.CanExecute(CommandParameter, CommandTarget))
{
this.IsEnabled = true;
}
else
{
this.IsEnabled = false;
}
}
// If a not RoutedCommand.
else
{
if (Command.CanExecute(CommandParameter))
{
this.IsEnabled = true;
}
else
{
this.IsEnabled = false;
}
}
}
}
Private Sub CanExecuteChanged(ByVal sender As Object, ByVal e As EventArgs)
If Me.Command IsNot Nothing Then
Dim command As RoutedCommand = TryCast(Me.Command, RoutedCommand)
' If a RoutedCommand.
If command IsNot Nothing Then
If command.CanExecute(CommandParameter, CommandTarget) Then
Me.IsEnabled = True
Else
Me.IsEnabled = False
End If
' If a not RoutedCommand.
Else
If Me.Command.CanExecute(CommandParameter) Then
Me.IsEnabled = True
Else
Me.IsEnabled = False
End If
End If
End If
End Sub
Son adım Execute yöntemidir. Komut bir ise RoutedCommand yöntemi RoutedCommandExecute çağrılır; aksi takdirde ICommandExecute yöntemi çağrılır.
// If Command is defined, moving the slider will invoke the command;
// Otherwise, the slider will behave normally.
protected override void OnValueChanged(double oldValue, double newValue)
{
base.OnValueChanged(oldValue, newValue);
if (this.Command != null)
{
RoutedCommand command = Command as RoutedCommand;
if (command != null)
{
command.Execute(CommandParameter, CommandTarget);
}
else
{
((ICommand)Command).Execute(CommandParameter);
}
}
}
' If Command is defined, moving the slider will invoke the command;
' Otherwise, the slider will behave normally.
Protected Overrides Sub OnValueChanged(ByVal oldValue As Double, ByVal newValue As Double)
MyBase.OnValueChanged(oldValue, newValue)
If Me.Command IsNot Nothing Then
Dim command As RoutedCommand = TryCast(Me.Command, RoutedCommand)
If command IsNot Nothing Then
command.Execute(CommandParameter, CommandTarget)
Else
CType(Me.Command, ICommand).Execute(CommandParameter)
End If
End If
End Sub