Equal pictures
Equal pictures ( imagem1 ; imagem2 ; mascara ) -> resultado
| Parâmetro | Tipo | Descrição | |
|---|---|---|---|
| imagem1 | Picture, Picture | → | Imagem fonte original |
| imagem2 | Picture, Picture | → | Imagem a comparar |
| mascara | Picture, Picture | ← | Máscara resultante |
| resultado | Boolean | ← | True se ambas imagens são idênticas; caso contrário, False |
Descrição
O comando Equal pictures compara precisamente dois imagens, tanto a nível de suas dimensões como de seu conteúdo.
Passe em imagem1 a imagem fonte e em imagem2 uma imagem comparar com a imagem fonte.
- Se as imagens não são do mesmo dimensão, o comando devolve False e o parâmetro mascara contém uma imagem vazia.
- Se as duas imagens são do mesmo dimensão mas contém conteúdos diferentes, o comando devolve False e o parâmetro mascara contém a imagem máscara resultante da comparação das dois imagens. Esta comparação se realiza pixel por pixel. Cada pixel diferente aparece em branco sobre um fundo preto.
- Se as duas imagens são idênticas, o comando devolve True e o parâmetro mascara contém uma imagem completamente preta.
Variáveis e conjuntos do sistema
A variável sistema OK toma o valor 1 se comparam as duas imagens. Em caso de anomalia, particularmente se uma das imagens não se inicializa (imagem vazia), a variável OK toma o valor 0.
Exemplo
No seguinte exemplo, comparamos duas imagens (pict1 e pict2) e mostramos a máscara resultante:
Este é o código do botão Compare:
$equal :=Equal pictures($pict1;$pict2;$mask)