如何获得Jpeg的大小?

时间:2017-07-22 08:40:03

标签: delphi jpeg

如何通过读取整个文件找到JPEG的图像尺寸?(我只是想获得图像尺寸。)

我的项目是通过广播UDP口袋在网络上的流图片;

我希望将摄像头捕捉到TJPEGImage var并检查图像大小,当图片大小大于X字节(X是网络上UDP口袋的最大口袋大小)时,请将其破解除了较小尺寸的图像,并将它们广播到UDP口袋到网络。

TMemoryStreamTFileStream的使用对于巨大的图像处理来说非常缓慢;

TBitmap var的使用会创建更大的位图大小,并且播放速度会更慢。

TMemoryStream压缩的使用很有用,但是将TMemoryStream分解为小尺寸口袋并在目标系统上重新组装它们是不可能的,因为在UDP协议上丢弃一些口袋。

所以我需要一个快速鳕鱼来获得捕捉TJPEGImage的大小。

样本鳕鱼:

.
.
jp:=TJPEGImage.Create;
jp.assign(….)     //(get picture from webcam)
if jp.size >X then
begin
  …… breaking jp apart to small size (C = small size picture count)
  for I := 1 to C do
    …… broad cast jp(i) to network base on UDP pocket;
End
Else
  …… broad cast jp to network base on UDP pocket;

0 个答案:

没有答案