Модераторы: Snowy, Alexeis, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Как сравнить два Image, на одинаковость 
:(
    Опции темы
Teran
  Дата 28.1.2007, 16:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 590
Регистрация: 9.9.2005
Где: Украина, Запорожь е

Репутация: нет
Всего: 3
Как программно сравнить два Image?
  smile 


--------------------
Ни цего не понимаю
PM MAIL ICQ   Вверх
VICTAR
Дата 28.1.2007, 16:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Участник
Сообщений: 1108
Регистрация: 6.10.2006

Репутация: 2
Всего: 80
попиксельно?
PM MAIL   Вверх
Guedda
Дата 28.1.2007, 16:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Подрывник
****


Профиль
Группа: Завсегдатай
Сообщений: 3137
Регистрация: 27.12.2005
Где: Ростов-на-Дону

Репутация: нет
Всего: 78
Цитата(VICTAR @  28.1.2007,  16:10 Найти цитируемый пост)
попиксельно? 

Ответ в вопросе. Попиксельно.


--------------------
Ll 2
PM MAIL WWW ICQ Skype GTalk   Вверх
aktuba
Дата 28.1.2007, 16:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Смышленный
***


Профиль
Группа: Завсегдатай
Сообщений: 1915
Регистрация: 24.4.2006
Где: Планета Земля

Репутация: нет
Всего: 38
я раньше MD5 использовал...


--------------------
user posted image
PM MAIL WWW Skype   Вверх
VICTAR
Дата 28.1.2007, 16:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Участник
Сообщений: 1108
Регистрация: 6.10.2006

Репутация: 2
Всего: 80
Не красиво, но работает
Код

function CompareImage(Img,Img2: Timage): boolean;
var i,j: integer;
begin
  result:=true;
  if (Img.Width<>Img2.Width)or
    (Img.Height<>Img2.Height) then result:=false;
  if not result then exit;
  for j:=0 to pred(Img.Height) do
    for i:=0 to pred(Img.Width) do
      if Img.Canvas.Pixels[i,j]<>Img2.Canvas.Pixels[i,j]
        then begin
              result:=false;
              break;
             end;
end;
PM MAIL   Вверх
Teran
Дата 28.1.2007, 16:47 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 590
Регистрация: 9.9.2005
Где: Украина, Запорожь е

Репутация: нет
Всего: 3
Цитата(aktuba @  28.1.2007,  16:31 Найти цитируемый пост)
я раньше MD5 использовал... 

работало нормально?


--------------------
Ни цего не понимаю
PM MAIL ICQ   Вверх
Snowy
Дата 28.1.2007, 17:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 18
Всего: 484
Вычитаешь одно изображение из другого: http://forum.vingrad.ru/topic-94492/0.html#entry720737
Получаешь разницу.
Как её оценивать (в процентах или ещё в чём) - это уже как тебе надо.
PM MAIL   Вверх
Alexeis
Дата 28.1.2007, 17:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Амеба
Group Icon


Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 55
Всего: 459
Цитата(Guedda @  28.1.2007,  16:14 Найти цитируемый пост)
Ответ в вопросе. Попиксельно. 

  Не факт, можно сравнивать картинку как файл. Все зависит от того в чем цель сравнения. Проверить н целостность или на потерю цвета при кодировании-декодировании или использовании фильтров и .т.д.


--------------------
Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать
PM ICQ Skype   Вверх
Teran
Дата 28.1.2007, 18:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 590
Регистрация: 9.9.2005
Где: Украина, Запорожь е

Репутация: нет
Всего: 3
Хочу сделать базу из capcha картинок против автороботов а потом их сравнивать - такое возможно?


--------------------
Ни цего не понимаю
PM MAIL ICQ   Вверх
mishapost
Дата 30.1.2007, 22:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 5
Регистрация: 27.1.2007

Репутация: нет
Всего: нет
Почитай любую книгу по цифровой обработке изображений и все станет ясно...
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Звук, графика и видео"
Girder
Snowy
Alexeis

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делится вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • По вопросам разработки игр стоит заглянуть сюда

FAQ раздела лежит здесь!

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Girder, Snowy.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Звук, графика и видео | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0561 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.