Вниз
Скачать: CL | DM;

Помогите пожалуйста со сравнением двух рисунков.   Найти похожие ветки 

 
Danco ©   (2008-04-06 01:37) [0]

1. У меня есть два рисунка.
2. Их нужно сравнить. (по пикселям или не по пикселям это не важно).
3. Получить результат. Одинаковые рисунки или нет.

Подскажите пожалуйста код, буду очень благодарен.


 
Германн ©   (2008-04-06 01:51) [1]


> Danco ©   (06.04.08 01:37)
>
> 1. У меня есть два рисунка.
> 2. Их нужно сравнить. (по пикселям или не по пикселям это
> не важно).
> 3. Получить результат. Одинаковые рисунки или нет.
>

Укажи твоё понимание "одинаковости" рисунков. Иначе пункт 2 позволяет считать одинаковыми любые два рисунка.


 
Danco ©   (2008-04-06 01:51) [2]

Добавлю до общего понятия:
Рисунок 1 имеет такую же ширину и высоту как и 2й.
Размеры у него не большие.

З.Ы. Знаю что самый простой вариант сравнить по пикселям, но не знаю как это реализовать. =)


 
Danco ©   (2008-04-06 01:53) [3]

Германн

Одинаковость - идентичные рисунки. =)


 
Германн ©   (2008-04-06 02:08) [4]


> Danco ©   (06.04.08 01:53) [3]
>
> Германн
>
> Одинаковость - идентичные рисунки. =)
>

Тогда с учётом
> Рисунок 1 имеет такую же ширину и высоту как и 2й

достаточно сравнить файлы рисунков на полное соответствие побайтно.


 
Danco ©   (2008-04-06 02:17) [5]

>Германн

Пожалуйста напишите как это реализовать в Delphi.

что то вроде такого простенького кода ..) если он есть

if bmp1=bmp2 then ... else ... ;


 
Германн ©   (2008-04-06 02:26) [6]


> Danco ©   (06.04.08 02:17) [5]
>
> >Германн
>
> Пожалуйста напишите как это реализовать в Delphi.
>
> что то вроде такого простенького кода ..) если он есть
>
> if bmp1=bmp2 then ... else ... ;
>


> З.Ы. Знаю что самый простой вариант сравнить по пикселям,
>  но не знаю как это реализовать. =)
>

TCanvas.Pixels + 2 цикла по ширине и высоте.


 
Danco ©   (2008-04-06 02:29) [7]

>Германн
>TCanvas.Pixels + 2 цикла по ширине и высоте.

Спасибо огромное!



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.008 c
2-1207647164
Fr1K
2008-04-08 13:32
2008.05.04
QuickRep


2-1207636459
nicky000
2008-04-08 10:34
2008.05.04
NULL


3-1196411574
keymaster
2007-11-30 11:32
2008.05.04
Delphi+Oracle. Проблема с table of...


10-1144224575
DancerMan
2006-04-05 12:09
2008.05.04
TWebbrowser. Клик по ссылке -> MyProcedure


2-1207544713
Андрей
2008-04-07 09:05
2008.05.04
Процедура копирования папки с поддиректориями и файлами




   Наверх