如何把一张JPEG图片转换成二进制流
加载一张图片后转换成^Byte类型的值,如何操作?
[解决办法]
这个太简单了,声明一个内存流或文件流对象,再调用jpg对象的savetostream就可以了
[解决办法]
- Delphi(Pascal) code
var _Jpeg: TJPEGImage; MS: TMemoryStream; B: array of Byte; i: integer; function IntToHex(_Int: integer): string; begin end;begin if not OD.Execute then Exit; MS := TMemoryStream.Create; try _Jpeg := TJPEGImage.Create; try _Jpeg.LoadFromFile(OD.FileName); _Jpeg.SaveToStream(MS); SetLength(B, MS.Size); Move(MS.Memory^, B[0], MS.Size); finally _Jpeg.Free; end; finally MS.Free; end;end;
[解决办法]
图片本身就是个“二进制流”,还转啥?
[解决办法]
[解决办法]
图片本身就是个“二进制流”,还转啥?