Graphic Delphi

Title: know if there is a bitmap in a TImage?
if (Image1.Picture.Bitmap.Empty) then
ShowMessage('No Image!') // 'Kein Bild vorhanden'
// For JPEG images:
// Bei JPEG Bildern:
if (Image1.Picture.Graphic = nil) then
ShowMessage('No Image!')