Como verificar se o TImage esta vazio

Delphi

05/11/2004

Gostaria de testa se o componente TImage esta vazio, ou seja com nenhuma imagem atribuida a ele..

T+
Dimmy


Dimmy

Dimmy

Curtidas 0

Respostas

Inutaishou

Inutaishou

05/11/2004

procedure TForm1.FormCreate(Sender: TObject);
begin
    If Image1.Picture.Bitmap.Empty Then
        ShowMessage( ´Nada´ );
end;


[]´s,


GOSTEI 0
Moonlight

Moonlight

05/11/2004

Image.Picture.Bitmap <> nil


GOSTEI 0
POSTAR