SWNET: Delphi (колличество пикселей одного цвета в прямойгольной области) - SWNET

Подскажите пожалуйста команду в Delphi, с помощью которой можно осуществить подчет пикселей заданного цвета в прямоугольной области и возращенные их количества в переменную.

function TCanvas.GetPixel(X, Y: Integer): TColor;

Вроде так.
Получаешь размеры изображения и пробегаешься по нему в цикле сравнивая цвет каждого пикселя с необходимым.

GeX
спасибо за ответ, видимо действительно проще не сделать )