为何Image没有判断是否加装了图像？该如何处理

为何Image没有判断是否加装了图像？
我在这个帖子里得到了大家的帮助，判断是否加装的问题解决了。
http://http://topic.****.net/u/20120321/14/c36f6e92-5580-426f-83d1-72f603b8f14e.html
下面给出代码，又出现了一个问题，我自己也看了，实在不知道出错在哪里。请大家帮忙看下：

C/C++ code

void __fastcall TForm1::Paste1Click(TObject *Sender)    //粘贴
{
if(Image1 -> Picture != NULL)
  {
  MessageDlg("There image existed, asure clear it?", mtWarning, TMsgDlgButtons() << mbOK, 0);
  Image1 -> Picture -> Assign(NULL);
  Image1 -> Picture -> Assign(Clipboard());
  }
else
  {
  Image1 -> Picture -> Assign(Clipboard());
  }
}

这只能实现文件复制粘贴。但是我Run之后，Image1里面也没有打开任何图片，我从word里面复制一个图片粘贴到Image1中，按理说不应该跳出那个提示框（Warning），但是它却跳出了，我很纳闷，刚Run，Image1里面有没有图像。

------解决方案--------------------
if((Image1 -> Picture != NULL) && (Image1 -> Picture->Bitmap != NULL)) 试一试
------解决方案--------------------
以前有人问过，好像是
if(Image1->Picture->Graphic == NULL)
{
ShowMessage("null");
}
else
{
ShowMessage("picture");
}