EQUIPAMENTO PARA LEITURA DE GABARITO

RICARDO.RAPA 01/07/2010 23:40:44
#346366
Olá, pessoal! Alguem conhece algum equipamento (marca, modelo, etc) para leitura de gabaritos?
AJSO 02/07/2010 01:17:34
#346368
Leitora de Cartões LC3000

http://www.automatica.com.br/leitora.htm

por causa dos custos acabei construindo meu proprio leitor de cartão resposta.


MARCELO.TREZE 02/07/2010 14:58:12
#346398
Resposta escolhida
olha não sei o tamanho do projeto, mas com um escaner comum vc poderá desenvolver um programa, para fazer a leitura do gabarito, usando bitblt, ou seja o programa identifica apenas a cor preta oou uma cor escura e sua podição e pronto.


RICARDO.RAPA 03/07/2010 13:35:34
#346452
Marcelo, detalhe sua idéia? pode ser?
MARCELO.TREZE 03/07/2010 18:22:23
#346455
não sei o tamanho do projeto, ou do uso, se não forem milhares de gabaritos, voc pode fazer o seguinte, existem variuos exemplo de como usar bitblt para se localizar uma cor espécifica em uma imagem, e retornar a posição dela, então estedude este método e use em seu projeto.

vou procurar algum exemplo de te envio
MARCELO.TREZE 03/07/2010 18:28:18
#346456
veja este exemplo de capturar a cor de um determinado ponto da imagem

[ô]Para saber a cor de um ponto em uma imagem usando API

Private Declare Function GetPixelRGB Lib [Ô]gdi32[Ô] Alias [Ô]GetPixel[Ô] (ByVal hdc As Long, _
ByVal X As Long, ByVal Y As Long) As RGB32


Private Type RGB32
Red As Byte
Green As Byte
Blue As Byte
Pad As Byte
End Type


Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)

Dim color As RGB32
color = GetPixelRGB(Picture1.hdc, X, Y)
with color
label1.caption = .Red
label2.caption = .Green
label3.caption = .Blue
Picture2.BackColor = RGB(.Red, .Green, .Blue)
label4.caption = Hex$(Picture2.BackColor)
end with
End Sub


altere o exemplo acima para fazer uma varredura na imagem escaneada, e ele mostrará tos 'pontos escuros da imagem e suas posições

mas vamos a alguns detalhes, este método é bem mais devagar que um equipamento especifico, porem bem mais rápido que manualmente

Tópico encerrado , respostas não são mais permitidas