关闭

delphi 取图片宽高

标签: delphistream算法
2174人阅读 评论(0) 收藏 举报
分类:

Var  
      Bmp:TBitMap;  
      Stream:TMemoryStream;  
  begin  
      Bmp   :=TBitMap.Create;  
      Bmp.LoadFromFile('XX.BMP');  
  //尺寸  
      PX   :=Bmp.Width   ;  
      PY   :=Bmp.Height;  
      Stream:=TMemoryStream.Create;  
      Bmp.SaveToStream(Stream);  
  //大小  
      Size   :=Stream.Size;  
      Stream.Free;  
      Bmp.Free;  
  end;   

可以用TBITMAP得到BMP文件  
  TICON得到ICO文件  
  TJPGIMAGE得到JPEG,JPG文件,DELPHI现只支持这些格式,如要用其它的,呵呵,你自己作解码算法吧,就没这么简单了

0
0

查看评论
* 以上用户言论只代表其个人观点,不代表CSDN网站的观点或立场
    个人资料
    • 访问:728555次
    • 积分:10306
    • 等级:
    • 排名:第1626名
    • 原创:291篇
    • 转载:129篇
    • 译文:1篇
    • 评论:81条
    文章分类
    最新评论