TImage的烦恼---图片类型

Michaelyfj 2000-12-12 01:24:00
我如何判断TImage图片的类型,是BMP、JPG或是...
...全文
111 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
Hank 2000-12-12
  • 打赏
  • 举报
回复
如果只是判断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;
ePing 2000-12-12
  • 打赏
  • 举报
回复
如果无法判断的话,你可以Image1.Picture.LoadFromFile

三少 :o)
Kingron 2000-12-12
  • 打赏
  • 举报
回复
用filename来判断!Timage根据文件的扩展名来进行Load!判断扩展名即可!

5,392

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧