Lector Biometrico ZKTECO K40
 

buenas tardes

tengo un lector biometrico ZktEco K40
he bajado las librerias he registrado ya en windows la libreria zkemkeeper.dll

pero no tengo la menor idea de como hacer que funcione o registrarlo en Delphi y poder usarlo

alguien puede darme una mano?

Creo que esta librería es un Active X.

Si es así, es muy fácil importar las librerías de tipos dentro de Delphi.

Aquí hay un tutorial de como importar dicha librería. Por desgracia, está en perfecto ¿¿Indonesio ?? , pero siguiendo las imágenes se entiende bastante bien

Saludos

buen dato, voy a probarlo mas tarde

perfecto
logre hacer la conexión

la libreria tiene algunas funciones como por ejemplo

OnFinger() que es un trigger

la pregunta es como poder utliizarla?

exit no es éxito; es salida/salir.
library no es librería; es biblioteca.

;)

alguien tiene experiencia con este tipo de lector?
me gustaria que cuando se registre la huella, el codigo asignado aparezca en la aplicacion que estoy desarrollando en un edit

no se utilizar la libreria y los eventos que en ella estan

alguien que me de una mano...
saludos

las librerias zkemkeeper las instale y me genero una unidad en Delphi
ya logre hacer la conexion utilice el siguiente codigo encontrado en internet

Código Delphi [-]
procedure TRptEntSal.button1click(Sender: TObject);
var
  dwEnrollNumber, dwMachinePrivilege ,dwVerifyMode,dwInOutMode,dwYear,dwMonth,dwDay,dwHour,dwMinute,dwSecond,dwWorkCode: integer;
  fecha:TDateTime;
  s:string;
  connect: boolean;
  DevId: integer; //Numero de maquina, siempre asignale 1
begin
 
connect := CZKEM1.Connect_net(devIp, devPort);
DevId := 1;
 
if connect then begin //verificamos si se conecto correctamente
    if CZKEM1.ReadAllGLogData(DevId) then
    while CZKEM1.GetGeneralLogData(DevId,dwEnrollNumber,dwVerifyMode,dwInOutMode,
                                  dwYear,dwMonth,dwDay,dwHour,dwMinute,dwSecond,dwWorkCode) do
    begin
      ShortDateFormat := 'mm/dd/yyyy';
      ShortTimeFormat := 'hh:mm';
      TimeSeparator := ':';
      DateSeparator := '/';
      Fecha := StrToDateTime(IntToStr(dwYear)+'/'+IntToStr(dwMonth)+'/'+IntToStr(dwDay)+' '+IntToStr(dwHour)+':'+IntToStr(dwMinute));
      s := format('%.*d',[7,Inttostr(dwEnrollNumber)])+'>'+FormatDateTime('mm/dd/yyyy', Fecha)+':'+FormatDateTime('hh:mm', Fecha) + Char(#13) + Char(#10);
      Memo.Lines.Add(s); //Coloca un Memo para ver los resultados de la descarga.
    end;
  end else ShowMessage('no se pudo conectar al equipo!!');
end;

Hasta ahi todo perfecto, pero tengo la inquietud de como hacer para que inmediatamente de leer la huella (el codigo resultante) vaya a un edit
no tengo la menor idea de como hacerlo, si alguien tiene experiencia en esto le agradeceria que me de una mano

saludos desde Peru

realmente estoy perdido en este tema
es totalmente nuevo para mi

alguien tiene una idea de como solucionar el tema de leer en linea (Realtime) la huella (codigo asignado) ???

realmente estoy perdido en este tema
es totalmente nuevo para mi

alguien tiene una idea de como solucionar el tema de leer en linea (Realtime) la huella (codigo asignado) ???