[NumLock]

нужно смотреть Content-Type в ответе:

Код:

type
  TForm1 = class(TForm)
    IdHTTP1: TIdHTTP;
    Edit1: TEdit;
    procedure FormCreate(Sender: TObject);
...
procedure TForm1.FormCreate(Sender: TObject);
var
  AFileStream: TFileStream;
begin
  AFileStream:=TFileStream.Create('temp.png', fmCreate);
  try
    IdHTTP1.Get('http://j2me.webservis.ru/notedelphi.php', AFileStream);
    Edit1.Text:=IdHTTP1.Response.ContentType;
  finally
    AFileStream.Free;
  end;
end;

для PNG картинки будет image/png