Hello;
I am trying to avoid insertion of empty pages from scanner, when user is calling for acquisition but the scanner bin is empty. As ABitmap.IsEmpty returns FALSE and ABitMap.IsAllBlank returns FALSE, I tried:
function IsEmtpyBmp(ABitmap: TIEBitmap): boolean;
var
d: double;
p: TImageEnProc;
domColor: TRGB;
begin
p := TImageEnProc.Create(nil);
try
p.AttachedIEBitmap := ABitmap;
d := p.GetDominantColor(domColor);
result := (d > 99);
finally
p.Free;
end;
end;
But GetDominantColor is returning me 34,5 ...
Why is that? and, how can I check if the bitmap is empty?
Thank you.
Dany
Search
