Измерение

[Kinslayer]

Доброго времени суток.

Вот у меня возникла проблема, мне нужно с помощью Делфи написать програму которая моглаб считывать изображение с Веб-Камеры(просто сделать снимок) и потом измерить обьект изображоный на нем.(нужно буить мерять ширину обьекта).
Я смоневаюсь что с помощью компонента TImage возможно решить эту проблему.
Подскажите пожалуйста каким компонентом лучше всего решить эту проблему.
Заранее спасибо!

 

[alexdebian]

link removed

 

[Kinslayer]

СПС)

 

[Kinslayer]

Народ, а неподскажите Агоритм по которому моно измерить Обьект на рисунке(рисунок моно считать черно-белым), ширина высота..
Или хорошую книжку по Делфи в области работы с графикой.(Хотябы название книжки и Авторы).

 

[Kinslayer]

Возможно кто-то знает как картинку(черно-белую) можно перегнать в массив?

 

[niello]

А зачем переанять, ведь она и есть массив
К примеру, если ты загрузил bmp рисунок в TImage то он будет храниться в Bitmap. Значит
Color := Image1.Picture.Bitmap.Canvas.Pixels[X,Y];//получаем цвет
и через цикл (использовать Image1.Picture.Bitmap.Width Image1.Picture.Bitmap.Height, а не Image1.Width!!!)
Если же нада черно-белое, то можно использовать формулу (R+G+B)/3;
c := ColorToRGB(Color);
R:= GetRValue©;
G:= GetGValue©;
B:= GetBValue©;
Result:=(R+G+B)/3;
Есть формулы с коэф значимости каждого цвета(так как глаз человека больше всего воспринимает зеленый и т.п).
Если что пиши в ICQ) 446-769-253