procedure AddImage(const FileName: string; X, Y, Width, Height: Double);
| FileName | string. Kuvatiedoston koko polku. Hyväksytään mikä tahansa VCL/LCL-grafiikkajärjestelmään rekisteröity formaatti (BMP, PNG, JPG jne.) |
procedure AddImage(Bitmap: TBitmap; X, Y, Width, Height: Double);
| Bitmap | TBitmap. Valmiiksi ladattu bittikartta, jonka PixelFormat = pf32bit. Ei saa olla nil; muulloin nostetaan EPdfError-virhe |
AddImage sijoittaa kuvan nykyiselle PDF-sivulle annettuun kohtaan ja kokoon. Käytettävissä on kaksi overloadia: toinen lataa kuvan suoraan tiedostopolusta ja toinen ottaa vastaan valmiin TBitmap-olion
Tiedostopohjainen overload käyttää sisäisesti TPicture.LoadFromFile-kutsua, joten tuetaan kaikkia VCL- tai LCL-grafiikkajärjestelmään rekisteröityjä kuvaformaatteja — mukaan lukien BMP, PNG (Vcl.Imaging.PngImage-yksikön tai LCL-vastineen kautta), JPEG ja muut. Varmista vain, että tarvittavat yksiköt ovat projektisi uses-osiossa ennen metodin kutsumista
Bittikartta-overload ottaa vastaan TBitmap-olion, jonka PixelFormat = pf32bit. Tämä on hyödyllistä, kun bittikartta on jo muistissa (esimerkiksi ruudunulkapuolisen renderöintivaiheen tuloksena), ja se välttää kierroksen levyn tai TPicture-olion kautta. nil-bittikartan välittäminen nostaa EPdfError-poikkeuksen
Parametrit X ja Y määrittävät kuvasijoittelun suorakulmion vasemman alakulman PDF-käyttäjäyksiköissä (alkupiste sivun vasemmassa alakulmassa, Y kasvaa ylöspäin). Width ja Height ohjaavat sivulle renderöityvää kokoa; lähdekuva skaalataan näihin mittoihin riippumatta sen pikseliresoluutiosta
// 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;