オーバレイ自体を削除する方法とオーバレイ上の図形の消去方法について示します。
- 1. オーバレイの削除
オーバレイを削除するには Overlays の Remove を使用します。 オーバレイへのハンドルを保管している場合は Nothing で初期化する事を忘れないよう注意してください。
Private Sub OverlayDelToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OverlayDelToolStripMenuItem.Click
'' オーバレイ(m_overlay1)が生成済みの場合は削除します.
If True = CFviImageView1.Display.FindOverlay(m_overlay1) Then
CFviImageView1.Display.Overlays.Remove(m_overlay1)
m_overlay1 = Nothing
End If
'' オーバレイ(m_overlay2)が生成済みの場合は削除します.
If True = CFviImageView1.Display.FindOverlay(m_overlay2) Then
CFviImageView1.Display.Overlays.Remove(m_overlay2)
m_overlay2 = Nothing
End If
CFviImageView1.Refresh()
End Sub
- 2. オーバレイ上の図形の消去
オーバレイ上の図形を消去するには Figures の Clear を使用します。
Private Sub OverlayClrToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OverlayClrToolStripMenuItem.Click
'' オーバレイ(m_overlay1)が生成済みの場合は図形を消去します.
If True = CFviImageView1.Display.FindOverlay(m_overlay1) Then _
m_overlay1.Figures.Clear()
'' オーバレイ(m_overlay2)が生成済みの場合は図形を消去します.
If True = CFviImageView1.Display.FindOverlay(m_overlay2) Then _
m_overlay2.Figures.Clear()
CFviImageView1.Refresh()
End Sub