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.

Example

// 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.GetPagesCount; // Append to end

      // Insert it into our TIFF
      Tiff.InsertPageAsImage( io.IEBitmap, insertPos );
  finally
    io.Free;
  end;
end;

---