CompressPage

Vlastnosti stránky

Popis

Zkomprimuje obsahový proud aktuálně vybrané stránky pomocí Flate (zlib). Chování je shodné s CompressContent, jen omezené na jednu stránku. Cyklus přes všechny stránky s SelectPage a CompressPage dá stejný výsledek jako jedno volání CompressContent, s výhodou, že aplikace může v UI hlásit postup po stránkách

Syntaxe

Delphi

Function TPDFlib.CompressPage: Integer;

ActiveX

Function PDFlib::CompressPage() As Long

DLL

int DLCompressPage(int InstanceID);

Návratové hodnoty

0	Failed — no document is open or no page is selected.
1	Obsahový proud stránky se zkomprimoval (nebo už byl zkomprimovaný a zůstal, jak je)

Poznámky

Už zkomprimované proudy se přeskočí, takže dvojí volání CompressPage na stejné stránce nic nezkazí. Sestavení Win64 používá přibalenou sadu SIMD objektů zlib-ng; sestavení Win32 používá generickou sadu objektů zlib-ng v režimu kompatibilním se zlib

Příklad

// Compress every page individually so the UI can report progress
var
  I, N: Integer;
begin
  N := PDF.GetPageCount;
  for I := 1 to N do
  begin
    PDF.SelectPage(I);
    PDF.CompressPage;
    ProgressBar1.Position := (I * 100) div N;
    Application.ProcessMessages;
  end;
  PDF.SaveToFile('compressed.pdf');
end;

Viz také

CompressContent, CompressImages, CompressFonts, SelectPage, PageCount