ImageEn, unit imageenview |
|
TImageEnView.OnAcquireBitmap
Declaration
property OnAcquireBitmap: TIEAcquireBitmapEvent;
Description
Occurs whenever a new bitmap is acquired during an acquisition.
Parameter | Description |
Sender | Will be either a TImageEnIO or TImageEnMIO control |
ABitmap | A TIEBitmap object that contains the acquired image |
DpiX, DpiY | The DPI of the acquired image |
Handled | Has no effect when acquiring via a TImageEnView/TImageEnIO |
// Save image when scanning with TImageEnView
procedure TForm1.ImageEnView1AcquireBitmap(Sender: TObject; ABitmap: TIEBitmap; DpiX, DpiY: Integer; var Handled: Boolean);
var
filename: string;
begin
filename := 'C:\Scanned Documents\Scan_' + FormatDateTime( 'yymmdd-hhnnss-zzz', Now ) + '.jpg';
ABitmap.SaveToFile( filename );
end;