Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > API de Windows
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 11-04-2004
mp336 mp336 is offline
Registrado
 
Registrado: abr 2004
Ubicación: Panama
Posts: 4
Poder: 0
mp336 Va por buen camino
Thumbs up Huella Digital

Quisiera saber si alguien me puede ayudar
en lo siguiente:

tengo un sensor de huella digital con el software de Instalacion
y tambien el SDK para programarlo "U.are.U Digitalpersona"
los ejemplos estan en Visual Basic

si alguien puede ayudarme a como hacerlo en Delphi
o donde conseguir las librerias le quedo eternamente agradecido:

Muchas gracias por la ayuda
Responder Con Cita
  #2  
Antiguo 11-04-2004
Nadie Nadie is offline
Miembro
 
Registrado: ago 2003
Ubicación: http://manchasenlapared.blogspot.com
Posts: 75
Poder: 21
Nadie Va por buen camino
si posteas los fuentes en vb se podrian traducir...
Responder Con Cita
  #3  
Antiguo 11-04-2004
mp336 mp336 is offline
Registrado
 
Registrado: abr 2004
Ubicación: Panama
Posts: 4
Poder: 0
mp336 Va por buen camino
Unhappy Ejemplos Solicitados

Como el Attach es de 1KB, entonces he dejado una copia de los
ejemplos en VB y C++ en un correo electronico:

email: mp336@hotmail.com
contraseña: clubdelphi

Los ejemplos funcionan correctamente los he probado corriendo el ejecutable creado

si me pueden ayudar muchas gracias
Responder Con Cita
  #4  
Antiguo 11-04-2004
__cadetill __cadetill is offline
Miembro
 
Registrado: may 2003
Posts: 3.387
Poder: 25
__cadetill Va por buen camino
Cita:
Empezado por mp336
Como el Attach es de 1KB, entonces he dejado una copia de los ejemplos en VB y C++ en un correo electronico:
Pero hombre!! si el código no era eterno, podías haberlo publicado directamente aquí!!
Responder Con Cita
  #5  
Antiguo 15-04-2004
mp336 mp336 is offline
Registrado
 
Registrado: abr 2004
Ubicación: Panama
Posts: 4
Poder: 0
mp336 Va por buen camino
Smile Codigo Fuente

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
Responder Con Cita
  #6  
Antiguo 26-06-2004
galexanderch galexanderch is offline
Registrado
 
Registrado: jun 2004
Posts: 7
Poder: 0
galexanderch Va por buen camino
Lector de Huellas

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???
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 10:48:31.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi