Jpeg & png size

← →
ed_209 (2002-09-10 11:57) [0]

Как определить размер и степень сжатия файлов формата jpeg и png из заголовка файла?

← →
AL2002 © (2002-09-10 12:34) [1]

?????????
uses JPEG;
var pic:TJPEGImage;

Pic.LoadFromFile("c:\ТёщинДом\Img.jpg");
Pic.Width
Pic.Height

← →
ed_209 (2002-09-13 10:50) [2]

блин... это не то- размер файла <> размерам картинки

← →
AL2002 © (2002-09-13 10:53) [3]

>блин... это не то- размер файла <> размерам картинки
Не понял. Тебе надо не размер картинки, а размер файла?

← →
Pumpkin (2002-09-13 13:02) [4]

Компонент TDCImageInfo
http://www.torry.net/vcl/graphics/other/tdcimageinfo.zip
will extract image dimensions, type, color depth, and file size from GIF, JPEG, PNG, BMP, PCX, and TIFF files.
За работоспособность не ручаюсь - не пробовал.

извлечешь ширину-высоту-глубину цвета, полчишь несжатый размер, а потом сравнивай.

← →
ed_209 (2002-09-14 05:10) [5]

thanks... i believe it works

← →
ed_209 (2002-09-15 07:39) [6]

нее... не то это... размер не определяет

← →
Pumpkin (2002-09-16 09:41) [7]

Что значит не определяет? А умножить-разделить?
var
II:TDCImageInfo;
UncompressedSize: Integer;
begin
II := TDCImageInfo.Create;
II.ReadFile("aaa.jpg");
UncompressedSize := II.Width* II.Height* II.Depth/8;
CompressionRatio := II.FileSize/UncompressedSize;
end;

Если ты хотел поиметь чегото другое, конкретизируй.

← →
ed_209 (2002-09-17 09:33) [8]

ok, как определить размер сжатого файла? - допустим, в файле после jpeg"a есть всякий мусор... мне надо узнать, где кончается картинка и начинается остальное

разобрать жпг ручками. формат в Сети есть.

Satanas Nobiscum! 17-Sep-XXXVII A.S.

← →
Pumpkin (2002-09-17 10:48) [10]

> как определить размер сжатого файла? -
> допустим, в файле после jpeg"a есть всякий мусор
Тут я тебе помочь не могу. Знаю что в JPEG можно точно узнать конец данных. Найди доки по форматам файлов (напр. www.wotsit.org) и вперед.

Jpeg & png size Найти похожие ветки