Hi,
even if I specify 200 dpi as scan resolution inside the WIA scanner interface, the acquired image got 300 dpi.
I used the following code:
procedure TForm23.Button2Click(Sender: TObject);
begin
if ImageEnMView1.MIO.SelectAcquireSource([ieaTwain, ieaWIA, ieaDCIM]) then
ImageEnMView1.MIO.Acquire(True);
end;
procedure TForm23.iemViewAcquireBitmap(Sender: TObject; ABitmap: TIEBitmap;
DpiX, DpiY: Integer; var Handled: Boolean);
begin
ABitmap.Write('c:\...\test.jpg');
Handled := True;
end;
Also setting a resolution of 200 dpi by code generates a 300 dpi image:
procedure TForm23.Button2Click(Sender: TObject);
begin
if ImageEnMView1.MIO.SelectAcquireSource([ieaTwain, ieaWIA, ieaDCIM]) then
begin
ImageEnMView1.MIO.AcquireParams.XResolution := 200;
ImageEnMView1.MIO.AcquireParams.YResolution := 200;
ImageEnMView1.MIO.Acquire(True);
end;
end;
procedure TForm23.iemViewAcquireBitmap(Sender: TObject; ABitmap: TIEBitmap;
DpiX, DpiY: Integer; var Handled: Boolean);
begin
ABitmap.Write('c:\...\test.jpg');
Handled := True;
end;
Any ideas?
PS: Please correct the "TImageEnMIO.Acquire" entry in the manual. Instead of the current text:
"If AppendAtEnd = False, and an image is selected, then new images will be inserted after the current selection. Otherwise, they are appended after the last image"
it should be:
"If AppendAtEnd = False, and an image is selected, then new images will be inserted before the current selection. Otherwise, they are appended after the last image".
Thank you,
Ale
Search
MIO.Acquire resolution always 300 dpi
Posted - Jun 23 2023 : 05:15:01
