2013-07-03 7 views
0

도와주세요. 제발 도와주세요! 그림 저장 ""도형, 그래픽 ""그리기 문자열 또는 그래픽을

Protected Overrides Sub OnPaint(ByVal e As PaintEventArgs) 

    Dim Bmp As New Bitmap(Width, Height) 
    Dim objBitmap As New Bitmap(Width, Height) 

    objBitmap.Save("c:\Prompter\checking2.TIFF") 

    Dim g As Graphics = Graphics.FromImage(Bmp) 
    Dim cx As Integer = Width 
    Dim cy As Integer = Height 
    Dim pen As New Pen(Color.Black) 
    Dim rect As New Rectangle(0, 0, Width, Height) 

    Dim drawFormat As New StringFormat() 
    drawFormat.Alignment = StringAlignment.Center 
    drawFormat.LineAlignment = StringAlignment.Center 

    Dim stringFont As New Font("Arial", 50) 
    g.DrawString(RichTextBox1.Text, stringFont, New SolidBrush(Color.White), rect, drawFormat) 

    Bmp.Save("c:\Prompter\checking2.TIFF", Imaging.ImageFormat.Tiff) 

    Using bmp2 As New Drawing.Bitmap(Width, Height) 
     DrawToBitmap(Bmp, New Rectangle(0, 0, Bmp.Width, Bmp.Height)) 
     Bmp.Save("c:\Prompter\screenshoot.bmp") 
    End Using 
End Sub 

저장 안함 그림 BLANK 이미지가 표시됩니다!

+0

당신이 내 대답을 시도 했습니까? – matzone

답변

-1

그래픽 이전에 저장 폐기하십시오 ..

g.Dispose() 
Bmp.Save("c:\Prompter\checking2.TIFF", Imaging.ImageFormat.Tiff)