teratail header banner
teratail header banner
質問するログイン新規登録

回答編集履歴

1

2024/03/04 10:35

投稿

TN8001
TN8001

スコア10111

answer CHANGED
@@ -1,11 +1,11 @@
1
- まずマウスイベントの邪魔になるので`zoomImage`に`IsHitTestVisible="False"`を付けます。
1
+ まずマウスイベントの邪魔になるので`zoomImage`に`IsHitTestVisible="False"`を付けます。
2
- ```vb
2
+ ```vb
3
- Private Sub LensPosition(x As Double, y As Double)
3
+ Private Sub LensPosition(x As Double, y As Double)
4
- Lens.Center = New Point(ImageX, ImageY)
4
+ Lens.Center = New Point(ImageX, ImageY)
5
- zoomImage.SetValue(Canvas.LeftProperty, ImageX - (ImageX * 3))
5
+ zoomImage.SetValue(Canvas.LeftProperty, ImageX - (ImageX * 3))
6
- zoomImage.SetValue(Canvas.TopProperty, ImageY - (ImageY * 3))
6
+ zoomImage.SetValue(Canvas.TopProperty, ImageY - (ImageY * 3))
7
- End Sub
7
+ End Sub
8
- ```
8
+ ```
9
- でマウス下に丸が来ました。
9
+ でマウス下に丸が来ました。
10
-
10
+
11
- `zoomImage`に`TranslateTransform`を付けて`zoomImageTranslateTransform.X = ImageX - (ImageX * 3)`でもいいと思います(特に差は感じませんでした)
11
+ `zoomImage`に`TranslateTransform`を付けて`zoomImageTranslateTransform.X = ImageX - (ImageX * 3)`でもいいと思います(特に差は感じませんでした)