私はスケッチパッドを持っていInkCanvas
ます; 消しゴムのサイズを変更したいので、次のように書きました。
Private Sub Sketchpad_KeyDown(sender As System.Object, e As System.Windows.Input.KeyEventArgs) Handles Sketchpad.KeyDown
If e.Key = Key.OemMinus Then
' Decrease size of Eraser to 5*5
Sketchpad.EraserShape = New RectangleStylusShape(5, 5)
End If
If e.Key = Key.OemPlus Then
' Increase size of Eraser to 50*50
Sketchpad.EraserShape = New RectangleStylusShape(50, 50)
End If
If e.Key = Key.I Then
' Change editing mode to Ink
Sketchpad.EditingMode = InkCanvasEditingMode.Ink
End If
If e.Key = Key.E Then
' Change editing mode to Eraser
Sketchpad.EditingMode = InkCanvasEditingMode.EraseByPoint
End If
End Sub
これを試して:
- eを押して消しゴムを選択すると、消しゴムのスタイラスのヒントが長方形で表示されます
- +記号を押してサイズを大きくすると、変更は表示されません。なんで?
- iを押して編集モードを変更すると、インクチップが表示されます。
- もう一度eを押すと、消しゴムに戻ります。消しゴムの形状が変更されていることがわかります。
+記号を押してみませんか?