图片显示

图片显示 Delphi / Windows SDK/API
http://www.delphi2007.net/DelphiDB/html/delphi_20061222175017155.html
我有个存放各种类型的图片的数据表，例如有BMP,JPEG等，想用TImage控件显示出来，要怎么做？类似的也行．

多格式不知道怎么判断...  
  我自己程序用jpg的  
   
  if   not   adoquery1.FieldByName('image').IsNull   then  
  begin  
    mstream:=tmemorystream.Create;  
        jpgfile:=tjpegimage.Create;  
        tblobfield(adoquery1.FieldByName('image')).SaveToStream(mstream);  
        mstream.Position:=0;  
        jpgfile.LoadFromStream(mstream);  
   
        Image1.Picture.Assign(jpgfile);  
  end;  
 

楼上的   会出现"JPEG   error   #53"的错误  
  我的表中现在有BMP的和JPEG格式的图   我想看看有没有能方法显示出来也能显示wmf的

转载于:https://www.cnblogs.com/delphi2007/archive/2008/12/11/1352481.html