文件格式判断问题,会的请进来

Question

谁能告诉我怎么判断一个文件是BMP格式的还是Jpg格式的,不是判断扩展名的
如果你有判断扩展名的那请把代码贴出来吧

Answer 1

Bmp的文件开头两个字节是'BM',你只要判断是这两个字符，那就是BMP格式了。
代码不用写了吧。

Answer 2

最好按照文件结构读一下否则2字节的文件也是合法的BMP了

Answer 3

充分利用
try
except
end;
也可以的

Answer 4

你用ultraedit打开看一下不同图片的结构，应该可以看出点眉目

Answer 5

給你一段簡單的代碼：
procedure TForm1.Button1Click(Sender: TObject);
begin
   OpenDialog1.Execute;
   edit1.Text:=OpenDialog1.FileName;
end;procedure TForm1.Button2Click(Sender: TObject);
var
  gs:string;
begin
         gs:=UpperCase(ExtractFileExt(Edit1.Text));
         if gs='.BMP' then showmessage('你選擇的是BMP格式的圖片');
         if gs='.Jpg' then showmessage('你選擇的是Jpg格式的圖片');      
end;

Answer 6

： linzhengqun(风。爱的翔舞) 的是思路;
 firstrose(kots) 的是編程時值得考慮的