procedure AddPicture(Picture: TPicture; X, Y: Double);
| Picture | TPicture. Das einzubettende Quellbild-Objekt. Die Grafik in Picture wird konvertiert und in natürlicher Größe auf der Seite platziert (abgeleitet aus Picture.Width / Picture.Height in Pixeln, übertragen auf PDF-Benutzereinheiten) |
procedure AddPicture(Picture: TPicture; X, Y, Width, Height: Double);
| Picture | TPicture. Das einzubettende Quellbild-Objekt. Die Grafik wird auf das angegebene Width × Height-Rechteck auf der Seite skaliert |
AddPicture bettet die in einem TPicture-Objekt gehaltene Grafik in die aktuelle PDF-Seite ein. Es werden zwei Überladungen bereitgestellt: Die Form mit drei Koordinaten platziert das Bild in natürlicher Größe, während die Form mit fünf Koordinaten es auf ein explizites Width × Height-Rechteck skaliert
TPicture ist der Standard-VCL/LCL-Container für jedes registrierte Grafikformat. Da er nicht formatspezifisch ist, können Sie Bitmaps, PNG-Bilder, JPEG-Bilder oder jede andere Grafik übergeben, die in eine TPicture-Instanz geladen wurde. Um eine einfache TBitmap direkt zu platzieren, verwenden Sie stattdessen AddImage. Für rohe JPEG-Streamdaten verwenden Sie AddJpegImage
Die Parameter X und Y definieren die untere linke Ecke des Bildes in PDF-Benutzereinheiten (Ursprung unten links auf der Seite, Y nimmt nach oben zu). Werden Width und Height weggelassen, wird die Platzierungsgröße aus den Pixelmaßen des Bildes unter Annahme von 72 DPI abgeleitet
var
Pic: TPicture;
begin
Pic := TPicture.Create;
try
Pic.LoadFromFile('C:\Images\chart.png');
// In natürlicher Größe platzieren, unten links bei (72, 500)
Pdf1.AddPicture(Pic, 72, 500);
// Oder auf ein explizites 300 x 200 pt-Rechteck skalieren
Pdf1.AddPicture(Pic, 72, 200, 300, 200);
finally
Pic.Free;
end;
end;