我有几个关於扩展名的问题想请教 1) IE是否支持显示所有类型的图片? 2) 如果可以通过编程获得所有的图像扩展名?

1. "所有" 這個定義的範圍太大, 當然是沒有. 應該說, 沒有那一支程式可以支援所有的圖檔格式, 新的格式還會不時出現呢!! 只是夠不夠 POPULAR 罷了!!    2. 同樣, 要取得 "所有的類型", 一樣可能性不大. 不過可以提供你取得特定副檔名的擴展名稱. 只小小的修改， 也可以列舉出目前系統中全部認識的類型，但是要判斷是不是圖型檔，除了列表法外，好像沒有更簡單的方法了！！     

function ExpandExtName(sExt:string):string ;
var
  reg : Tregistry ;
  s : string ;
begin
  Result:='' ;
  if copy(sExt,1,1)<>'.' then
    exit ;      reg:=TRegistry.Create(KEY_READ) ;
  try
    reg.RootKey:=HKEY_CLASSES_ROOT ;
    if reg.KeyExists(sExt) then
      begin
      reg.OpenKeyReadOnly(sExt) ;
      s:='\' reg.ReadString('') ;
      if reg.KeyExists(s) then
        begin
        reg.OpenKeyReadOnly(s) ;
        Result:=reg.ReadString('') ;
        end ;
      end ;
  finally
    reg.free ;
    end ;    end;    procedure TForm1.Button1Click(Sender: TObject);
begin
  Caption:=ExpandExtName(edit1.text) ;
end ;
 

...Aquarius

------
水瓶男的blog: http://791909.blogspot.com