判断TImage图片的类型

如果只是判断BMP、JPG、GIF图片，倒是有一个简单的方法，用数据流判断，因为BMP、GIF、JPG格式的文件流有标识符的，分别如下： 名称 宽度 标识符

BMP 2位 BM

JPG 10位 chr($FF)+chr($D8)+chr($FF)+chr($E0)+chr($00)+chr($10)+'JFIF'

GIF 3位 GIF

通过这种方式可以判断。

当然通过DELPHI的系统的类也可以判断，用ClassName函数，但是不能判断GIF类型。

例如：

if Image1.Picture.Graphic<>nil then

Edit1.Text:=Image1.Picture.Graphic.ClassName;