请问怎么生成正确的图片文件?
情况:1、一个窗体,中间从上到下排列一个shape,一个label,一个textbox,command2,command1。源码:
Private Sub Command1_Click()
Randomize
Form1.AutoRedraw = True
SavePicture Form1.Image, "c:\a.bmp"
End Sub
Private Sub Command2_Click()
Shape1.BackStyle = 1
Shape1.BackColor = QBColor(0)
End Sub
设想:先点command2,使shape变色,再在textbox中任意输入,如12345,然后再点command1,把整个窗体保存为a.bmp,这张图片包含shape,label,textbox,但不含command1,command2。
请问,1,为什么存出来的图片上是一片空白?源码上怎么修改?
2,源码上怎么修改才能实现图片包含shape,label,textbox,但不含command1,command2?
谢谢啦!