请教各位如何解决在delphi中清除Image的选定图像出现的错误

Question

本人用delphi6开发的一个小程序中使用TImage和TOpenPictureDialog控件，用代码选定了一个图像，再按Button按钮就清除。
在选定图像时使用的代码是
  if OpenPictureDialog.Execute then
    Image1.Picture.LoadFromFile(OpenPictureDialog.FileName);
在Button按钮就清除使用的代码先是
 Image1.Picture.LoadFromFile('');
后来认为是代码出了问题再用
 Image1.Picture.Bitmap.FreeImage;
代码是没有错误的，但是却出现这种情况，在系统使用时怎么清除也清除不了，还是显示图片。如果在调试时却能够清除。代码还是同样的代码，为什么在调试时能清除而在系统使用时却不能清除。请教各位如何解决这个问题。

Answer 1

Image1.Picture.Bitmap:=nil;//用这个来清除

Answer 2

加上这句话试一下
reFresh;

Answer 3

  Image1.Picture.Bitmap.Assign(nil);

Answer 4

  Image1.Picture.Assign(nil);

Answer 5

出现的错误？什么错误啊？用 try except

Answer 6

试试用这种方法吧：
  Image1.Picture.Bitmap.FillRect(Image1.ClientRect);

Answer 7

Image1.Picture.Assign(nil);
谁说不行，睁开你的狗眼举起你的驴蹄子试试

Answer 8

image1.Picture:=nil;肯定可以的！