摘要: //AValue 为图片文件流头两个字节 function GetImageExt(AValue: Cardinal): String; begin case AValue of $4D42, $424D: Result := '.bmp'; $D8FF, $FFD8: Result := '.jpg'; $4947, $4749: Result := '.gif';... 阅读全文
posted @ 2016-12-10 13:14 伯通心智 阅读(962) 评论(0) 推荐(0) 编辑