Hi Etienne
As follows:
var
cl: TRGB;
begin
Percentage := ImageEnView.Proc.GetDominantColor( cl );
If Percentage = 100 then
ShowMessage( 'the image is blank!' )
else
pnlDominantColor.Color := TRGB2TColor( cl );
end;
Nigel
Xequte Software
www.xequte.com
nigel@xequte.com