|
Adaugă un XObject imagine color împreună cu un XObject imagine soft-mask PDF 1.4 (ISO 32000-1 8.9.5.4), astfel încât imaginea rezultată să aibă transparență completă la nivel de pixel, nu doar limita binară pornit/oprit a traseului vechi /ImageMask
Sintaxă Delphi:
function AddImageWithSMask(Width, Height: Integer; const RGB: TBytes; const Alpha: TBytes): Integer;
function AddImageWithSMask32(Bitmap32: TBitmap): Integer;
Sintaxă C++:
__property int AddImageWithSMask(int Width, int Height, const TBytes& RGB, const TBytes& Alpha);
__property int AddImageWithSMask32(TBitmap* Bitmap32);
Descriere
Imaginile SMask au un canal independent DeviceGray pe 8 biți, a cărui luminozitate controlează alfa imaginii color la randare (0 = complet transparent, 255 = complet opac). HotPDF emite ambele plane ca XObject-uri imagine comprimate Flate, leagă intrarea /SMask din dicționarul imaginii color la XObject-ul soft-mask și returnează un index XImages pe care THPDFPage.ShowImage îl acceptă direct - tot codul de plasare din aval rămâne neschimbat
AddImageWithSMask(Width, Height, RGB, Alpha)
- Width / Height: pixel dimensions, identical for both planes.
- RGB: Width * Height * 3 bytes, row-major top-down, R G B interleaved per pixel (no row padding).
- Alpha: Width * Height bytes, row-major top-down, 8-bit luminosity per pixel.
AddImageWithSMask32(Bitmap32)
Suprasarcină de conveniență pentru scenariul obișnuit „am un PNG cu alfa”; TBitmap trebuie să aibă PixelFormat = pf32bit; HotPDF citește direct rândurile BGRA din ScanLine, le rearanjează la R G B pentru planul color și copiază octetul A în planul alfa înainte de a delega către punctul de intrare brut AddImageWithSMask
Valoare returnată: un index în XImages identic cu cel returnat de AddImage; transmiteți-l către THPDFPage.ShowImage pentru a plasa imaginea pe o pagină. Returnează -1 când StrictVersionLock este activ și Version curentă este sub PDF 1.4 (altfel versiunea este ridicată automat la 1.4)
Exemplu de cod
// Raw-bytes path: build a 64x64 magenta-on-white plane + horizontal
// alpha gradient and place the result on the page
var
RGB, Alpha: TBytes;
W, H, X, Y, Idx, ImIdx: Integer;
begin
W := 64;
H := 64;
SetLength(RGB, W * H * 3);
SetLength(Alpha, W * H);
for Y := 0 to H - 1 do
for X := 0 to W - 1 do
begin
Idx := Y * W + X;
RGB[Idx * 3 + 0] := 255; // R
RGB[Idx * 3 + 1] := 0; // G
RGB[Idx * 3 + 2] := 255; // B
Alpha[Idx] := Byte((X * 255) div (W - 1));
end;
HPDF.Version := pdf14; // SMask requires PDF 1.4
HPDF.Compression := cmFlateDecode;
HPDF.BeginDoc;
ImIdx := HPDF.AddImageWithSMask(W, H, RGB, Alpha);
HPDF.CurrentPage.ShowImage(ImIdx, 80, 80, 256, 256, 0);
HPDF.EndDoc;
end;
See Also
AddImage, THPDFPage.ShowImage, Version, PDF Filter Support
|