Código Delphi [-] if not Assigned(Image1.Picture.Graphic) then ShowMessage('Está vacio');
if not Assigned(Image1.Picture.Graphic) then ShowMessage('Está vacio');