Huella Digital

[mp336]

TRATE DE PEGAR UN EJEMPLO EN VB, PERO NO SE PUEDE PORQUE ESTE CAMPO DE TEXTO SOLAMENTE SOPORTA 10.000 Caracteres Y EL EJEMPLO MAS PEQUEÑO EL TAMAÑO ES MUCHO MAS GRANDE

[galexanderch]

Mi Nombre es Alexander Gavidia, desde Venezuela, soy TSU en Informática y me encuentro desarrollando un sistema que permita leer la huella, verificarla, guardarla en la base de datos y posteriormente consultarla. Ya tengo una libreria suministrada por el vendedor del producto y software, tambien unos demos con cada una de las funciones en Visual Basic. Vi el codigo y es sensillo, a las librerias se le pasan parametros. Hice una de los demos en Delphi pero me da erros de acces Violation.

Les anexo lo que me esta dando y que se lo reporte a la empresa pero tiene una semana que no responde:

Buenas tardes,



El presente es para informarle que ya se realizó la instalación del SoftWare SDK, se instalaron los tres demos, Acceso Simple al Lector, Acceso Directo al Lector y Funciones de Base de Datos. Realice el demo de acceso Simple al lector con el Lenguaje de programación delphi y se me esta presentando este error:

Access Violation at address 00934395


[img]cid:image001.png@01C459FA.467A6920[/img]





La declaración de la librerias lo estoy realizando de la siguiente forma:

Implementation;

Function EnrollUser(Template, ImagePath, GuideMessage : String; HOwner, X1, Y1, X2, Y2, Core : Integer) : Integer;
Far; External 'UF100';



Function VerifyUser(Template : String; SecLevel, HOwner, X1, Y1, X2, Y2, Core : Integer) : Integer;
Far; External 'UF100';



Y el llamado de la misma de la siguiente forma:



procedure TForm1.Timer1Timer(Sender: TObject);
Var
RetornoValor, I : Integer;
Ruta : String;
begin
Ruta := 'C:\my documents\Sistemas\DELPHI5\Dll\Huellas';
Timer1.Interval := 0;
ultimo_mensaje_guia := Chr(32);
For I := 0 To 256 Do
ultimo_mensaje_guia := ultimo_mensaje_guia + Chr(32);



RetornoValor := EnrollUser(ultimo_template_capturado, Ruta, ultimo_mensaje_guia, Form1.Handle, 20, 20, 160, 160, 1);



If RetornoValor <> 0 Then
Timer1.Interval := 100;



LMensaje.Caption := ultimo_mensaje_guia;
LMensaje.Refresh;
end;



Cabe destacar que el Lector se activa, al emitir la luz de color rojo, pero al colocar el dedo se presenta el error

Si me pueden ayudar???

[delphi.com.ar]

Empezado por galexanderch

Código Delphi [-]
Function EnrollUser(Template, ImagePath, GuideMessage : String; HOwner, X1, Y1, X2, Y2, Core : Integer) : Integer;
Far; External 'UF100';

Function VerifyUser(Template : String; SecLevel, HOwner, X1, Y1, X2, Y2, Core : Integer) : Integer;
Far; External 'UF100';

Dudo que tengas que pasar un string y no un PChar... ¿Porqué no nos muestras la definición en VB?

[Sick boy]

Hola,

Yo tambien tengo esos SDKs, y mucho ojo, no es lo mismo lo que se instala en la maquina del usuario final que el SDK para programación.

Si no tienes los SDKs de programacion te faltaran cantidad de objetos y no podrás programar nada.

Por cierto, si que hay ejemplos en Delphi, pero estan en Delphi 6, y no compilan en Delphi 5.

Si alguien sabe como pasarlos a Delphi 5 yo los tengo y los puedo postear.

Saludos

[sometimedj]

mira pana estoy interesado en esos SDKs, tanto el de programacion como para el usuario final, me refiero a los de delphi 6, porq estoy desarrollando una aplicacion bajo delphi 6 que utiliza la huella digital como clave de acceso, de pana que si los tienes agradeceria tu ayuda... si puedes mandamelos a hjuarez@intercable.net.ve o a hjuarezdj@yahoo.es En serio agradeceria tu ayuda

[AngelMarvin]

Hola a todos. Me parece como caido del cielo este post porq yo tambien estoy implementando una aplicacion utilizado un lector biometrico de Digital Persona con el SDK U.are.U. La cosa es que ya tengo la aplicacion basandome en el demo para delphi q existe (tuve q hacerle algunas modificaciones para que compile en Delphi 7) y guardando los codigos en una bd. Estos codigos, q son OleVariants los guardo en la bd como un string de bytes (cabe aclarar que al recuperar este string creo un array de bytes 'PByteArray' en el mismo orden en que los guardé). El probelma es cuando alguien mete la huella y quiero encontrar de quien es. Al poner el dedo el programa captura la huella y abro mi tabla con las huellas almacenadas y creo un bucle que compare la huella recien capturada con cada huella almacenada (utilizando un objeto de la clase "TFDVerify" que viene en el SDK) y pues de 3 personas solo me reconoce a 1. Es como si los codigos en mi bd no tuvieran relacion con la huella q capturo para comparar.
Por favor, este trabajo es urgente y si alguien me puede pasar un algoritmo y una forma de almacenar y recuperar la huellas, aunque sea una idea me ayudaria bastante y le estare por siempre agradecido.
PD: He intentado guardarla en un campo blob de oracle (SGBD q utilizo) pero no me funciona.
Gracias por tomarte el tiempo de ller hasta aquí.

[sometimedj]

Buenas angel, mira veo que tu estas usando dichos SDK's, por favor si los tienes enviamelos por correo a hjuarezdj@yahoo.es o hjuarez@intercable.net.ve agradeceria tu ayuda en realidad