タイトル | : 描画した線がFormが重なると消えてしまう |
記事No | : 1955 |
投稿日 | : 2005/08/03(Wed) 18:38 |
投稿者 | : プル |
[OSのVer]:Windows XP Home [VBのVer]:VB.NET 初めて質問させていただきます。 2つForm(Form1とForm2)を作成し、片方のForm(Form1)に線を描画させています。 線を描画したForm1に、Form2を重ねると描画したはずの線が消去されてしまいます。 素人な質問で恐縮ですが、どなたか解決策をご教授いただけませんでしょうか? よろしくお願いいたします。
Private Sub Button1_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button1.Click
Dim frm2 As Form2 = New Form2
Dim g As Graphics = Me.CreateGraphics Dim BPen As New Pen(Color.Black, 3) BPen.DashStyle = Drawing2D.DashStyle.Dash Dim pt1 As New Point(10, 30) Dim pt2 As New Point(170, 30) g.DrawLine(BPen, pt1, pt2) BPen.Dispose() g.Dispose()
frm2.Show()
End Sub
|