背景值如果为空

Gle*_*rse 0 delphi delphi-xe2

我有

property Background: TPicture read FBackground write SetBackground;
Run Code Online (Sandbox Code Playgroud)

如果没有任何东西可以被赋予它,背景的价值是什么?

我试过了

if Background = NULL  then

begin
...
..
...
end;
Run Code Online (Sandbox Code Playgroud)

NGL*_*GLN 5

这取决于.在构造函数中创建字段并分配FBackground时,请使用:

if FBackground.Graphic = nil then
Run Code Online (Sandbox Code Playgroud)

要么:

if not Assigned(FBackground.Graphic) then
Run Code Online (Sandbox Code Playgroud)

如果已分配图形,则使用:

if FBackground.Graphic.Empty then
Run Code Online (Sandbox Code Playgroud)

如果属性和字段都未分配,则使用:

if FBackground = nil then
Run Code Online (Sandbox Code Playgroud)

要么:

if not Assigned(FBackground) then
Run Code Online (Sandbox Code Playgroud)

以上所有组合:

if (FBackground = nil) or (FBackground.Graphic = nil) or FBackground.Graphic.Empty then
Run Code Online (Sandbox Code Playgroud)