property BitmapCount: Integer; // read only
BitmapCount, o an etkin olan sayfadaki görüntü sayfa nesnelerinin sayısını döndürür
(PDF 1.7 spec bölüm 8.9). Altta yatan görüntü akışını tamamen işlenmiş bir Delphi
TBitmap haline (32-bit RGBA, Canvas.Draw, panoya aktarım
ya da PNG/BMP kaydı için hazır) getiren Bitmap[Index] indeksleyicisiyle birlikte çalışır
Active değeri False olduğunda, PageNumber
geçersiz olduğunda ya da sayfa görüntü nesnesi içermediğinde değer 0 olur
Sayı ImageCount ile aynıdır; iki özellik yalnızca indeksleyicilerinin
dönüş türünde ayrışır: Image[Index], Data alanı çözülmüş piksel
tamponunu, RawData alanı ise hâlâ kodlanmış görüntü akışını taşıyan bir
TPdfImage kaydı verir; Bitmap[Index] ise bu tamponu sahipliği
çağırana geçen yönetilen bir VCL TBitmap içine sarar
Tipik döngü, for I := 0 to Pdf.BitmapCount - 1 do ve ardından gelen
Pdf.Bitmap[I] biçimindedir Her erişim yeni bir TBitmap ayırır
ve pikselleri kopyalar; sıkı işleme döngülerinde çağırmayın, yeniden kullanılacaksa
bitmap'i önbelleğe alın. İşiniz bittiğinde GDI kaynaklarını hemen serbest bırakmak için
döndürülen her bitmap'i serbest bırakın
TBitmap alpha kanalına PDFium tarafından otomatik olarak birleştirilirImageCount / Image[Index], GDI bitmap
ayırma yükünü ortadan kaldırır
var I: Integer;
var Bmp: TBitmap;
for I := 0 to Pdf1.BitmapCount - 1 do
begin
Bmp := Pdf1.Bitmap[I];
try
Bmp.SaveToFile(Format('image_%d.bmp', [I]));
finally
Bmp.Free;
end;
end;