TESTAR SEMELHAN?A ENTRE IMAGENS

NICKOLASCARLOS 13/06/2014 17:39:55
#438906
Quero testar a semelhança entre uma imagem X e uma imaghem Y, e quero que me retorne um volor em porcentagem!
Dá para fazer isso?
PEDROALSOI 13/06/2014 18:32:47
#438907
Como assim em porcentagem?
NICKOLASCARLOS 13/06/2014 19:13:37
#438908
Tipo assim: A imagem X é aproximadamente 50% igual á imagem Y. è isso
PEDROALSOI 14/06/2014 10:14:29
#438921
E no que isso se baseia?
Tipo se ter o mesmo numeros de pixel aumenta 20%, se as imagens tem o mesmo tamanho aumenta 50%, e assim por adiante?
NICKOLASCARLOS 14/06/2014 11:32:43
#438924
BASEIA NOS PIXELS!
PEDROALSOI 14/06/2014 16:53:48
#438927
Entao apenas calcula-se pelo numero de pixels?

Desculpa meu teclado nao tem acento
NICKOLASCARLOS 14/06/2014 19:26:04
#438929
pelo numero de pixels e pela semelhança entre os pixels
NICKOSOFT 17/06/2014 09:30:39
#438972
ai esta so o codigo apenas q compara, no caso carrego as imagens com fileopen...e os pictures sao stretchimage, inicialmente ainda procuro o min ali so por via das duvidas total....

          Me.Cursor = Cursors.WaitCursor
Application.DoEvents()

Dim bm1 As Bitmap = PictureBox1.Image
Dim bm2 As Bitmap = PictureBox2.Image

Dim wid As Integer = Math.Min(bm1.Width, bm2.Width)
Dim hgt As Integer = Math.Min(bm1.Height, bm2.Height)

Dim Iguais As Integer = 0
Dim Diferentes As Integer = 0

Dim are_identical As Boolean = True
For x As Integer = 0 To wid - 1
For y As Integer = 0 To hgt - 1
If bm1.GetPixel(x, y).Equals(bm2.GetPixel(x, y)) Then
Iguais += 1
Else
Diferentes += 1
End If
Next y
Next x

Dim Total As Integer = wid * hgt
Dim Valor As Double = (Iguais * 100) / Total

Me.Cursor = Cursors.Default

MessageBox.Show([Ô]as imagens sao [Ô] & CInt(Valor) & [Ô]% iguais[Ô])

NICKOLASCARLOS 17/06/2014 22:06:40
#438984
O critério usado é um critério da quantidade de pixels! Porém preciso um que teste a semelhança entre eles!
PEDROALSOI 20/06/2014 11:59:35
#439052
Como assim semelhança?
NICKOLASCARLOS 20/06/2014 14:54:38
#439058
Semelhança:

s.f. Característica do que é semelhante.
Em que há ou demonstra haver relação ou afinidade entre seres, coisas, pontos de vista; que possui algo em comum; analogia: estão casados, mas não demonstram semelhança alguma.
Que apresenta uma relação de conformidade entre o modelo e o resultado imitado: há semelhança entre o verdadeiro e a cópia.
Aquilo que pode ser visto no exterior; aparência ou aspecto.
Em que pode haver comparação entre uma ou mais coisas; confronto: não há relação de semelhança entre as obras.
(Etm. semelhar + ança)
Página 1 de 2 [15 registro(s)]
Tópico encerrado , respostas não são mais permitidas