procedure AddImage(const FileName: string; X, Y, Width, Height: Double);
| FileName | string. Ruta completa al archivo de imagen. Se acepta cualquier formato registrado en el sistema gráfico VCL/LCL (BMP, PNG, JPG, etc.) |
procedure AddImage(Bitmap: TBitmap; X, Y, Width, Height: Double);
| Bitmap | TBitmap. Un bitmap precargado con PixelFormat = pf32bit. No debe ser nil; en caso contrario lanza EPdfError |
AddImage coloca una imagen en la página PDF actual en la posición y el tamaño dados. Hay dos sobrecargas disponibles: una carga la imagen directamente desde una ruta de archivo y la otra acepta un objeto TBitmap ya construido
La sobrecarga basada en archivo usa TPicture.LoadFromFile internamente, por lo que se admite cualquier formato de imagen registrado en el sistema gráfico VCL o LCL, incluidos BMP, PNG (a través de Vcl.Imaging.PngImage o el equivalente LCL), JPEG y otros. Simplemente asegúrese de incluir las unidades relevantes en la cláusula uses de su proyecto antes de llamar a este método
La sobrecarga de mapa de bits acepta un TBitmap con PixelFormat = pf32bit. Esto es útil cuando el mapa de bits ya está en memoria (por ejemplo, desde un paso de renderizado fuera de pantalla) y evita un viaje de ida y vuelta por disco o TPicture. Pasar un mapa de bits nil genera una excepción EPdfError
Los parámetros X e Y especifican la esquina inferior izquierda del rectángulo de colocación de la imagen en unidades de usuario de PDF (origen en la parte inferior izquierda de la página, Y aumenta hacia arriba). Width y Height controlan el tamaño renderizado en la página; la imagen de origen se escala para ajustarse a estas dimensiones independientemente de su resolución de píxeles
// Colocar un archivo PNG en (72, 600), renderizado a 200 x 150 pt en la página
Pdf1.NewPage(595, 842);
Pdf1.AddImage('C:\Images\logo.png', 72, 600, 200, 150);
// Agregar un mapa de bits de 32 bits ya construido
var
Bmp: TBitmap;
begin
Bmp := TBitmap.Create;
try
Bmp.PixelFormat := pf32bit;
Bmp.LoadFromFile('C:\Images\photo.bmp');
Pdf1.AddImage(Bmp, 72, 400, 300, 200);
finally
Bmp.Free;
end;
end;