PDFSaveUseDPI Example for Delphi
var
RasterIO: LEADRasterIO;
begin
RasterIO:= CreateComObject(CLASS_LEADRasterIO) as LEADRasterIO;
//Use image DPI when saving as PDF
RasterIO.PDFSaveUseDPI:= True;
//Save image as Raster PDF with CCITT G4 compression
RasterIO.Save(LEADRasterView1.Raster,
WideString('c:\temp\tmp.pdf'),
FILE_RAS_PDF_G4, 1,
1, SAVE_OVERWRITE);
end;