Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Мультимедиа в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 30.12.2011, 14:17   #1
vetatto
 
Регистрация: 26.12.2011
Сообщений: 4
По умолчанию Обработка Фотографии

Привет всем. Есть такая задача.
Есть фотография на ней сфотографированы стебли лежащие на земле. И вот нужно понять, где земля, а где стебли. Кто подскажет как это сделать. Все голову сломал уже.



Нужно каким-то образом удалить землю.
vetatto вне форума Ответить с цитированием
Старый 30.12.2011, 16:19   #2
NetSpace
Участник клуба
 
Аватар для NetSpace
 
Регистрация: 03.06.2009
Сообщений: 1,792
По умолчанию

загружаешь картинку в компонент Image. Определяешь цвет земли - тыкаешь в эту точку мышкой - это цвет пикселя
Код:
color1: = Image1.Canvas.Picture.Pixels[CursorPos.X,CursorPos.Y];
а дальше в цикле заменяешь все такие пиксели на белые, типа как трава не белом фоне будет:
Код:
for i:=1 to Image1.Width do
for j:=1 to Image1.Height do
begin
   if(Image1.Canvas.Picture.Pixel[i,j]:=color1)then
   Image1.Canvas.Picture.Pixel[i,j]:=clWhite; 
end;
а уж если ещё и траву зелёную задумаете убрать, то тут одним пикселем земли не обойтись...
ну, или как-то так, ошибки есть точно, но я себе это так представляю...
Программирование - это единственный способ заставить компьютер делать то, что тебе хочется, а не то, что приходится.

Последний раз редактировалось NetSpace; 30.12.2011 в 16:22.
NetSpace вне форума Ответить с цитированием
Старый 30.12.2011, 16:28   #3
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 19,042
По умолчанию

Идея вроде и ничего, только цветов больно много будет для замены белым. Можно попробовать заменять не только выбранный цвет, а и ближайшие к нему цвета в некотором диапазоне
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 30.12.2011, 17:15   #4
vetatto
 
Регистрация: 26.12.2011
Сообщений: 4
По умолчанию

Спасибо. Но вот как быть если цвет с земли совпадет с цветом стеблей. Я так пробовал. У меня получалось, что большая часть земли закрашивалась белым, но и на стеблях появлялись белые пиксели.

Вот еще думаю если вокруг проверяемого пикселя выделить круг например радиусом 5-6 пикселей и проверять если вокруг него цвет сильно отличается, то это стебель, а не земля. Спасибо. Но попробую уже это реализовать завтра или после НГ.
Всех с наступающим.
vetatto вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Найти следы фотографии accer Свободное общение 2 17.08.2011 03:38
Фотографии Vlados1994 Помощь студентам 0 01.06.2011 00:37
Фотографии maks5 Паскаль, Turbo Pascal, PascalABC.NET 3 17.03.2011 23:48
Склеивание фотографии Кинельски Мультимедиа в Delphi 8 01.06.2010 02:30
отображение фотографии вадим-курбатов Microsoft Office Excel 2 24.09.2009 13:24