function AddJpegImage(JpegImage: TStream; X, Y, Width, Height: Double): Boolean;
| JpegImage | TStream. En ström med rå JPEG-komprimerad data. Strömpositionen bör vara vid början av JPEG-datan när denna metod anropas |
True om JPEG-datan avkodades och bäddades in på sidan. Returnerar False om strömmen inte innehåller giltig JPEG-data eller om inbäddningsåtgärden misslyckasAddJpegImage bäddar in en JPEG-bild som tillhandahålls som en rå byte-ström på den aktuella PDF-sidan. Eftersom JPEG-datan skickas vidare direkt utan omkodning bevaras bildkvaliteten exakt som den lagrats i källströmmen. Detta gör metoden väl lämpad för dokumentgenerering i stor volym, där avkodning och omkomprimering av bilder skulle introducera onödig kvalitetsförlust eller CPU-overhead
Strömmen JpegImage måste innehålla en komplett, giltig JPEG-fil som börjar vid SOI-markören. Strömmens aktuella position bör vara vid början av JPEG-datan innan metoden anropas. Alla efterkommande av TStream accepteras — TFileStream, TMemoryStream, databas-blobströmmar och så vidare
Parametrarna X och Y anger nedre vänstra hörnet av placeringsrektangeln i PDF-användarenheter (origo i sidans nedre vänstra hörn, Y ökar uppåt). Width och Height sätter den renderade storleken på sidan; JPEG-bilden skalas för att passa oavsett sina pixeldimensioner
Metoden returnerar True vid lyckat resultat. Om strömmen inte innehåller giltig JPEG-data returneras False utan att ett undantag väcks, så anropare bör kontrollera returvärdet när data av osäker ursprung hanteras
var
Stream: TFileStream;
begin
Stream := TFileStream.Create('C:\Images\photo.jpg', fmOpenRead or fmShareDenyNone);
try
Pdf1.NewPage(595, 842);
if not Pdf1.AddJpegImage(Stream, 72, 400, 300, 225) then
ShowMessage('Failed to embed JPEG image.');
finally
Stream.Free;
end;
end;