2017-10-17 65 views
1

我写了文字在VB.NET图片后保存图片到我的电脑是好的,但我的问题时,在水晶报表背景文本显示图像是黑色颜色 我希望背景白色书写当在水晶报表背景文字显示图像是黑色颜色

On Error Resume Next 
    My.Computer.FileSystem.DeleteFile(DbPath + "\Pictures\" + "orign" + ".jpg") 
    PictureBox2.Image.Save(DbPath + "\Pictures\" + "orign" + ".jpg", Imaging.ImageFormat.Jpeg) 
    'End If 
    Dim bmp = Bitmap.FromFile(DbPath + "\Pictures\" + "orign" + ".jpg") 

    Dim newImage = New Bitmap(bmp.Width, bmp.Height + 40) 

    Dim gr = Graphics.FromImage(newImage) 
    gr.DrawImageUnscaled(bmp, 0, 0) 
    gr.DrawString(MigraID.Text & Space(2) & MigraName.Text & Space(2) & IqamaNum.Text & Space(2) & DatePicH.Text, 
    New Font("Tahoma", 22), 
    Brushes.Black, New RectangleF(0, bmp.Height, bmp.Width, 50)) 


    newImage.Save(DbPath + "\Pictures\" + MigraID.Text + ".jpg") 

    PictureBox2.Image = Image.FromFile(DbPath + "\Pictures\" + MigraID.Text + ".jpg")[![enter image description here][1]][1] 
+0

参见[为什么在水晶报表的图像白色背景不显示为纯白色?](https://stackoverflow.com/questions/30 40517 /为什么图像合晶体报告与 - 白色背景犯规出现-作为纯白色)。 –

+0

我做到了,但仍然是问题 –

回答

0

我找到了解决我的问题

gr.Clear(Color.White)