procedure AddPicture(Picture: TPicture; X, Y: Double);
| Picture | TPicture. Het bron-picture-object dat moet worden ingesloten. De graphic in Picture wordt geconverteerd en op natuurlijke grootte op de pagina geplaatst (afgeleid van Picture.Width / Picture.Height in pixels, gemapt naar PDF-gebruikerseenheden) |
procedure AddPicture(Picture: TPicture; X, Y, Width, Height: Double);
| Picture | TPicture. Het bron-picture-object dat moet worden ingesloten. De graphic wordt geschaald zodat hij past in de opgegeven Width × Height-rechthoek op de pagina |
AddPicture sluit de graphic die een TPicture-object bevat in op de huidige PDF-pagina. Er zijn twee overloads: de vorm met drie coördinaten plaatst de picture op natuurlijke grootte, terwijl de vorm met vijf coördinaten hem schaalt naar een expliciete Width × Height-rechthoek
TPicture is de standaard VCL/LCL-container voor elk geregistreerd grafisch formaat. Omdat het formaat-onafhankelijk is, kunt u bitmaps, PNG-afbeeldingen, JPEG-afbeeldingen of elke andere graphic doorgeven die in een TPicture-instantie is geladen. Om een kale TBitmap rechtstreeks te plaatsen kunt u beter AddImage gebruiken; voor ruwe JPEG-streamgegevens gebruikt u AddJpegImage
De parameters X en Y definiëren de linkerbenedenhoek van de afbeelding in PDF-gebruikerseenheden (oorsprong linksonder op de pagina, Y loopt omhoog). Als Width en Height ontbreken, wordt de plaatsingsgrootte afgeleid van de pixerafmetingen van de picture bij een aanname van 72 DPI
var
Pic: TPicture;
begin
Pic := TPicture.Create;
try
Pic.LoadFromFile('C:\Images\chart.png');
// Place at natural size, lower-left at (72, 500)
Pdf1.AddPicture(Pic, 72, 500);
// Or scale to an explicit 300 x 200 pt rectangle
Pdf1.AddPicture(Pic, 72, 200, 300, 200);
finally
Pic.Free;
end;
end;