procedure AddImage(const FileName: string; X, Y, Width, Height: Double);
| FileName | string. Resim dosyasının tam yolu. VCL/LCL graphics system kayıtlı her biçim (BMP, PNG, JPG vb.) kabul edilir |
procedure AddImage(Bitmap: TBitmap; X, Y, Width, Height: Double);
| Bitmap | TBitmap. A pre-loaded bitmap with PixelFormat = pf32bit. Must not be nil; raises EPdfError otherwise. |
AddImage, verilen konum ve boyutta geçerli PDF sayfasına bir resim yerleştirir. İki overload mevcuttur: biri resmi doğrudan bir dosya yolundan yükler, diğeri önceden hazırlanmış bir TBitmap nesnesi kabul eder
Dosya tabanlı overload dahili olarak TPicture.LoadFromFile kullanır; dolayısıyla VCL veya LCL graphics system kayıtlı her resim biçimi desteklenir — BMP, PNG (Vcl.Imaging.PngImage veya LCL karşılığıyla), JPEG ve diğerleri dahil. Bu metodu çağırmadan önce yalnızca ilgili unit'leri projenizin uses bloğuna eklediğinizden emin olun
Bitmap overload'u, PixelFormat = pf32bit olan bir TBitmap kabul eder. Bitmap hâlihazırda bellekteyken (örneğin ekran dışı bir render adımından) bu işe yarar ve disk üzerinden veya TPicture üzerinden gidip gelmeyi önler. nil bitmap geçirmek bir EPdfError exception'ı fırlatır
X ve Y parametreleri, PDF user unit cinsinden resim yerleşim dikdörtgeninin sol alt köşesini belirtir (başlangıç noktası sayfanın sol altındadır, Y yukarı doğru artar). Width ve Height sayfadaki işlenmiş boyutu denetler; kaynak resim, piksel çözünürlüğünden bağımsız olarak bu boyutlara sığdırılır
// Place a PNG file at (72, 600), rendered 200 x 150 pt on the page
Pdf1.NewPage(595, 842);
Pdf1.AddImage('C:\Images\logo.png', 72, 600, 200, 150);
// Add a pre-built 32-bit bitmap
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;