以编程方式测试是否将图像分配给表单上的TImage

问题描述:

我的程序中有一个表单上有一个TImage组件。以编程方式测试是否将图像分配给表单上的TImage

在一些情况下,程序必须测试:

如果“有分配给TImage组件的图像属性的图像”,那么 .............

我该怎么做?

在此先感谢。

你不说,但我会假设你在谈论德尔福。

您可以检查是否有通过测试是在TImage中控制位图:

if Image.Picture.Bitmap.Width > 0 then 
    // do whatever 

如果Image.Picture.Bitmap.Empty然后DoStuff

+1

'如果不是Image.Picture.Empty然后DoStuff'作为OP要求运行'DoStuff'only时,有一个画面。 – 2011-07-13 21:11:11

优于从不迟到!
正确的做法是:

if Assigned(Image1.Picture.Graphic) then ...