Código Delphi [-]if Image1.Picture.Graphic <> nil then ShowMessage('Si contiene imagen') else ShowMessage('No contiene ninguna imagen');
if Image1.Picture.Graphic <> nil then ShowMessage('Si contiene imagen') else ShowMessage('No contiene ninguna imagen');