I have the following request, which seems simple to solve but I haven't been able to make progress:
I would like to scan several pages using an ADF scanner and, during the scanning process, have a thumbnail appear on the screen and be saved directly to a folder, with the same characteristics (color, size in KB, etc.) as when they come out of the scanner.
Currently I do it like this:
ImageEnMView1.EnableLoadEXIFThumbnails := True;
ImageEnMView1.MIO.TwainParams.FileTransfer := True;
ImageEnMView1.MIO.Acquire;
contador := ImageEnMView1.ImageCount - 1;
//
ImageEnMView1.MIO.Params[0].TIFF_Compression := ioTIFF_JPEG;
ImageENMView1.MIO.DuplicateCompressionInfo();
//
If `contador` < 0 then begin
imgAguardando.Visible := True;
ImageEnMView1.Clear;
image.Clear;
Abort;
end
else begin
for `c` := 0 to contador do
ImageEnMView1.GetImageToFile(c, 'C:\Projetos\NovaGmCapture\Win32\Debug\IncluiPagina\' + IntToStr(c) + '.tif');
end;
However, the thumbnails are not updated in real time on the form, and I need to force the image settings to make them small; otherwise, each image comes out as 11MB from the scanner.
How can I solve this? My idea is to work as if it were a Kodak Capture Desktop?
Search
