TIETIFFHandler.InsertPageAsImage
Declaration
function InsertPageAsImage(bmp: TObject; pageIndex: integer): boolean;
Description
Inserts a loaded image at the specified index. Viewer must be a
TIEBitmap,
TImageEnView or
TImageEnIO.
TIETIFFHandler Page Insertion Methods:
◼Insert from a TIFF file:
InsertTIFFFile
◼Insert from any image file:
InsertPageAsFile
◼Insert from a TIFF stream:
InsertTIFFStream
◼Insert from any image stream:
InsertPageAsStream
◼Insert from a bitmap:
InsertPageAsImage
// Add a page from the scanner
procedure TMainForm.btnAddFromScannerClick(Sender: TObject);
var
io: TImageEnIO;
insertPos: integer;
begin
io := TImageEnIO.Create( nil );
try
if io.Acquire() then
begin
insertPos := Tiff.PageCount; // Append to end
// Insert it into our TIFF
Tiff.InsertPageAsImage( io.IEBitmap, insertPos );
finally
io.Free;
end;
end;