Picture1.PaintPicture Image1.Picture, 0, 0, Picture1.Width, Picture1.Height
可将Image1.Picture换成你自己的图片来源。