Вниз
Скачать: CL | DM;

сжатие графики   Найти похожие ветки 

← →
MANGOL   (2004-09-23 14:13) [0]

привет!

не подскажите, как мне сжимать графику?
знаю, что можно переводить в jpg, но енто годится только для фоновых картинок, где прозрачного цвета нету.
Посоветуйте пожалста что-нибудь! ссылку почитать, или кодом например :))


← →
Красный молоток   (2004-09-23 14:57) [1]

uses Zlib;


← →
Mihey_temporary ©   (2004-09-23 15:27) [2]

PNG


← →
WondeRu ©   (2004-09-23 16:08) [3]

Красный молоток   (23.09.04 14:57) [1]
uses Zlib;

но лучше
ZLibEx.pas (zlib 1.2.1)   www.dellapasqua.com
этот модуль переработан и работает быстрее чем стандартный

ну и модуль написал, чтобы потоки легче было сжимать

unit uCompressRoutines;

interface
uses
 Classes, ZlibEx;

function CompressStream (aSource, aTarget: TStream): Single;
procedure DecompressStream (aSource, aTarget: TStream);

implementation

function CompressStream (aSource, aTarget: TStream): Single;
var
 comprStream: TZCompressionStream;
begin
 aSource.Position := 0;
 comprStream := TZCompressionStream.Create(aTarget, zcMax);
 try
   comprStream.CopyFrom(aSource, aSource.Size);
   Result := comprStream.CompressionRate;
 finally
   comprStream.Free;
 end;
end;

procedure DecompressStream (aSource, aTarget: TStream) ;
var
 decompStream: TZDecompressionStream;
begin
 decompStream := TZDecompressionStream.Create(aSource);
 try
   aTarget.CopyFrom(decompStream, 0);
   aTarget.Position := 0;
 finally
   decompStream.Free;
 end;
end;

end.


← →
Ландграф Павел ©   (2004-09-23 16:58) [4]

вот только никто не сказал какой формат сжимать библиотекой zlib, самый лучший вариант bmp256>rar/zip просто дико сжимает... для 32 битных разумеется tga с RLE, для фоновых картинок лучше jpeg ненайдешь...


← →
MANGOL   (2004-09-23 17:58) [5]

>>WondeRu ©   (23.09.04 16:08) [3]
спасибы! будем пробовать.

>>Ландграф Павел ©   (23.09.04 16:58) [4]
а где можно взять модули для работы с rar/zip?


← →
П7   (2004-09-23 22:40) [6]


> MANGOL   (23.09.04 17:58) [5]

В Тырнете... (: Хы-хы... Рамблер тебе в помощь.

ГЫ: Забыл в посте про изометрию написать. Скинь мне на мыло письмо с прозьбой дать тебе исходники Изометрического чего-нибудь, чтобы я не забыл и узнал твой адрес... (: Ну а я тебе этого изометрического отсыплю, по доброте душевной... (:


← →
Zer0 ©   (2004-09-24 10:01) [7]

ppms/ppmd (http://www.compression.ru/ds/ppmdi1.rar) тоже неплохой архиватор, рвет rar

для loseless сжатия изображению можно использовать bmf 1.1 ( http://compression.ru/ds)

---
skl-4ever



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.027 c
1-1104142001
come
2004-12-27 13:06
2005.01.16
время работы программы


1-1104518771
Cheguevara
2004-12-31 21:46
2005.01.16
Как создать в листбоксе итем содержащий путь к файлу


10-1080297097
IgorYak
2004-03-26 13:31
2005.01.16
TClientDataSet.ApplyUpdates (CORBA - Delphi 6, Kylix)


14-1103872857
Ученик
2004-12-24 10:20
2005.01.16
Компоненты для Delphi 8, 2005


1-1104219817
Ega23
2004-12-28 10:43
2005.01.16
Variant




   Наверх