procedure AddPicture(Picture: TPicture; X, Y: Double);
| Picture | TPicture. El objeto imagen de origen que se va a incrustar. El gráfico dentro de Picture se convierte y se coloca en la página a su tamaño natural (derivado de Picture.Width / Picture.Height en píxeles, asignado a unidades de usuario PDF) |
procedure AddPicture(Picture: TPicture; X, Y, Width, Height: Double);
| Picture | TPicture. El objeto imagen de origen que se va a incrustar. El gráfico se escala para ajustarse al rectángulo de Width × Height especificado en la página |
AddPicture incrusta el gráfico contenido en un objeto TPicture en la página PDF actual. Se proporcionan dos sobrecargas: la forma de tres coordenadas coloca la imagen a su tamaño natural, mientras que la forma de cinco coordenadas la escala a un rectángulo explícito de Width × Height
TPicture es el contenedor estándar de VCL/LCL para cualquier formato gráfico registrado. Como no es específico de un formato, puede pasar mapas de bits, imágenes PNG, imágenes JPEG o cualquier otro gráfico que se haya cargado en una instancia de TPicture. Para colocar directamente un TBitmap simple, considere AddImage. Para datos sin procesar de flujo JPEG, use AddJpegImage
Los parámetros X y Y definen la esquina inferior izquierda de la imagen en unidades de usuario PDF (origen en la esquina inferior izquierda de la página, Y aumenta hacia arriba). Cuando se omiten Width y Height, el tamaño de colocación se deriva de las dimensiones en píxeles de la imagen suponiendo 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;