Hi Nigel,
i forgot to test the change.
But when i set the AcquireFrame... in the AcquireParams the result is not the same as setting the TwainParams.
By Acquireparams the left value is ignored and the width of the scanned area is only 50% of the wanted.
One Error on my side is how i get the information for the Papersize and the information what the max. values for bottom and right when left and top is 0.
When i use the max Physicalwidth the result of the scan is wrong. In the case of my fujitsu i get A4 correct when the left is 0 and the right is the A4 width.
But how can i get really the correct Width and height of the scanner.
Hier my sourcecode
procedure ImageEnMView_SetPaperSize(Const ImageMEV: TImageEnMView; PSize:Integer; doCenter:Boolean);
var
PLeft,
PWidth,
PHeight : Double;
begin
with IOPDFPaperSizes[IndIOPDFPaperSizes(PSize)] do
begin
with ImageMEV.MIO, AcquireParams{, TwainParams} do
begin
AcquireFrameEnabled:=false;
AcquireFrameEnabled:=true;
Update;
PWidth :=Width /72;
PHeight:=Height/72;
PLeft:=0;
if doCenter then
begin
PLeft:=(AcquireFrameRight{PhysicalWidth}-PWidth)/2;
end;
AcquireFrameLeft :=Max(0,PLeft);
AcquireFrameTop :=0;
AcquireFrameRight :=Min(PLeft+PWidth,PhysicalWidth);
AcquireFrameBottom:=PHeight;
end;
end;
end;
The different result of the scanning setting parameters by AcquireParams or Twainparams seem to me like an error.
Regards
Ralf
Search
