procedure AddPicture(Picture: TPicture; X, Y: Double);
| Picture | TPicture. El objeto de imagen de origen que se va a incrustar. El gráfico dentro de Picture se convierte y se coloca en la página a 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 picture de origen que se incrusta. El gráfico se escala para caber en el rectángulo Width × Height indicado 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 en su tamaño natural, mientras que la forma de cinco coordenadas la escala a un rectángulo explícito Width × Height
TPicture es el contenedor VCL/LCL estándar para cualquier formato gráfico registrado. Como no es específico de 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 un TBitmap simple directamente, considere AddImage en su lugar. Para datos de flujo JPEG sin procesar, use AddJpegImage
Los parámetros X e Y definen la esquina inferior izquierda de la imagen en unidades de usuario de PDF (origen en la parte 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 de píxel de la imagen asumiendo 72 DPI
var
Pic: TPicture;
begin
Pic := TPicture.Create;
try
Pic.LoadFromFile('C:\Images\chart.png');
// Colocar en tamaño natural, esquina inferior izquierda en (72, 500)
Pdf1.AddPicture(Pic, 72, 500);
// O escalar a un rectángulo explícito de 300 x 200 pt
Pdf1.AddPicture(Pic, 72, 200, 300, 200);
finally
Pic.Free;
end;
end;