Hi Sidney
You can just ignore the border area when testing if blank:
// Test if the image is blank (with 1% threshold and ignoring the border area)
threshold := 1.0; // Allow 1% of image to be a different color
borderPerc := 10; // Border area is 10% of width/height
ImageEnView1.SelectionBase := iesbBitmap;
ImageEnView1.Select( MulDiv( ImageEnView1.IEBitmap.Width, borderPerc, 100 ),
MulDiv( ImageEnView1.IEBitmap.Height, borderPerc, 100 ),
MulDiv( ImageEnView1.IEBitmap.Width, 100 - borderPerc, 100 ),
MulDiv( ImageEnView1.IEBitmap.Height, 100 - borderPerc, 100 ));
if ImageEnView1.Proc.GetDominantColor(cl) >= 100 - threshold then
ShowMessage('Image is blank!')
else
ShowMessage('Image is NOT blank!');
ImageEnView1.Deselect();
Nigel
Xequte Software
www.imageen.com