PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEVWEBDEV e WINDEV Mobile

Inicio → WINDEV 2024 → Windev: Biometric and Fingerprint
Windev: Biometric and Fingerprint
Iniciado por João Ricardo, ago., 19 2009 1:22 AM - 6 respostas
Publicado em agosto, 19 2009 - 1:22 AM
My name is João Ricardo and I live in Brazil. Working in the company Psal, Primo Systems Applications Ltda. We use the Windev about 4 years and so far we have managed to develop our systems without major difficulties.
Acquire the biometric reader FingKey Hamster's Nitgen to implement in our system of fingerprint identification.
Along with the equipment received your dll's and sample programs and their sources. The sample programs were developed in Visual Basic 6 and Delphi 6. In tests with the sample programs achieved success in the use of FingKey.
Began the development of routines to access the device using as basis the documentation and the sample programs.
We observed the return of the methods of the dll was not expected, so post in the forum decided that question in an attempt to get some help.
I do not know what may be happening.
Someone has already developed something that could help me?

C++ (Documentation)

NBioAPI_Init() is the function that initializes the NBioBSP module. NBioAPI_Init()
returns the Handle of the NBioBSP module used in the application.

NBioAPI_HANDLE g_hBSP; // NBioBSP module Handle.

// Initialize BSP Module
if ( NBioAPI_Init(&g_hBSP) != NBioAPIERROR_NONE )
{
// Init module failed. Show error message.
}
// Init success.

Windev (my code)

ret is int

hwnd is int = SysWinActive()
IF hwnd = 0 THEN hwnd = Handle()

hInst is int = LoadDLL("NbioBSP.DLL")
IF hInst = 0 THEN
Error("Loading error")
ELSE
// Initialize
ret = CallDLL32("NBioBSP.dll", "NBioAPI_Init", hwnd)
Info("NBioAPI_Init: "+ret)
// OpenDevice
ret = CallDLL32("NBioBSP.dll", "NBioAPI_OpenDevice", hwnd, 1)
Info("NBioAPI_OpenDevice: "+ret)
FreeDLL(hInst)
END

I appreciate any help.
Publicado em agosto, 19 2009 - 10:28 AM
João Ricardo wrote:
My name is João Ricardo and I live in Brazil. Working in the company Psal, Primo Systems Applications Ltda. We use the Windev about 4 years and so far we have managed to develop our systems without major difficulties.
Acquire the biometric reader FingKey Hamster's Nitgen to implement in our system of fingerprint identification.
Along with the equipment received your dll's and sample programs and their sources. The sample programs were developed in Visual Basic 6 and Delphi 6. In tests with the sample programs achieved success in the use of FingKey.
Began the development of routines to access the device using as basis the documentation and the sample programs.
We observed the return of the methods of the dll was not expected, so post in the forum decided that question in an attempt to get some help.
I do not know what may be happening.
Someone has already developed something that could help me?

C++ (Documentation)

NBioAPI_Init() is the function that initializes the NBioBSP module. NBioAPI_Init()
returns the Handle of the NBioBSP module used in the application.

NBioAPI_HANDLE g_hBSP; // NBioBSP module Handle.

// Initialize BSP Module
if ( NBioAPI_Init(&g_hBSP) != NBioAPIERROR_NONE )
{
// Init module failed. Show error message.
}
// Init success.

Windev (my code)

ret is int

hwnd is int = SysWinActive()
IF hwnd = 0 THEN hwnd = Handle()

hInst is int = LoadDLL("NbioBSP.DLL")
IF hInst = 0 THEN
Error("Loading error")
ELSE
// Initialize
ret = CallDLL32("NBioBSP.dll", "NBioAPI_Init", hwnd)
Info("NBioAPI_Init: "+ret)
// OpenDevice
ret = CallDLL32("NBioBSP.dll", "NBioAPI_OpenDevice", hwnd, 1)
Info("NBioAPI_OpenDevice: "+ret)
FreeDLL(hInst)
END

I appreciate any help.



Hi,

Guess you are not a C++ programmer :) and you give very little
information..

1)

NBioAPI_HANDLE g_hBSP;

I guess NBioAPI_HANDLE is a structure. (not an integer and NOT
necessarily a window handle !!! )


2)
// Initialize BSP Module
if ( NBioAPI_Init(&g_hBSP) != NBioAPIERROR_NONE )


g_hBSP is passed by reference that's what the ampersand & stands for.

so :

IF API("NBioBSP.dll", "NBioAPI_Init", &g_hBSP) <> NBioAPIERROR_NONE


is the correct WINDEV translation.

hth
Björn Lietz-Spendig
Publicado em agosto, 19 2009 - 10:28 AM
João Ricardo wrote:
My name is João Ricardo and I live in Brazil. Working in the company Psal, Primo Systems Applications Ltda. We use the Windev about 4 years and so far we have managed to develop our systems without major difficulties.
Acquire the biometric reader FingKey Hamster's Nitgen to implement in our system of fingerprint identification.
Along with the equipment received your dll's and sample programs and their sources. The sample programs were developed in Visual Basic 6 and Delphi 6. In tests with the sample programs achieved success in the use of FingKey.
Began the development of routines to access the device using as basis the documentation and the sample programs.
We observed the return of the methods of the dll was not expected, so post in the forum decided that question in an attempt to get some help.
I do not know what may be happening.
Someone has already developed something that could help me?

C++ (Documentation)

NBioAPI_Init() is the function that initializes the NBioBSP module. NBioAPI_Init()
returns the Handle of the NBioBSP module used in the application.

NBioAPI_HANDLE g_hBSP; // NBioBSP module Handle.

// Initialize BSP Module
if ( NBioAPI_Init(&g_hBSP) != NBioAPIERROR_NONE )
{
// Init module failed. Show error message.
}
// Init success.

Windev (my code)

ret is int

hwnd is int = SysWinActive()
IF hwnd = 0 THEN hwnd = Handle()

hInst is int = LoadDLL("NbioBSP.DLL")
IF hInst = 0 THEN
Error("Loading error")
ELSE
// Initialize
ret = CallDLL32("NBioBSP.dll", "NBioAPI_Init", hwnd)
Info("NBioAPI_Init: "+ret)
// OpenDevice
ret = CallDLL32("NBioBSP.dll", "NBioAPI_OpenDevice", hwnd, 1)
Info("NBioAPI_OpenDevice: "+ret)
FreeDLL(hInst)
END

I appreciate any help.


maybe this works...

g_hBSP is int
IF API("NBioBSP.dll", "NBioAPI_Init", &g_hBSP) <> NBioAPIERROR_NONE THEN
Error("WTF")
ELSE
API("NBioBSP.dll", "NBioAPI_OpenDevice", g_hBSP, 1)
END

next tip.. 50 bucks :)
Björn
Publicado em dezembro, 15 2015 - 12:03 AM
This worked.

ret is int

hwnd is system int
//IF hwnd = 0 THEN hwnd = Handle()

hInst is int = LoadDLL("NbioBSP.DLL")
IF hInst = 0 THEN
Error("Loading error")
ELSE
// Initialize
ret = CallDLL32("NBioBSP.dll", "NBioAPI_Init", &hwnd)
Info("NBioAPI_Init: "+ret)
// OpenDevice
ret = CallDLL32("NBioBSP.dll", "NBioAPI_OpenDevice", hwnd, 1)
Info("NBioAPI_OpenDevice: "+ret)
FreeDLL(hInst)
END
Publicado em dezembro, 15 2015 - 7:27 PM
This worked even better

objNBio is object OLE dynamic
objNBio = new object OLE "NBioBSPCOM.NBioBSP"
objNBio>>Device>>Open(255)
iPurpose is system int = 0x01
objExtraction is object OLE dynamic
objExtraction = objNBio>>Extraction
objExtraction>>Capture(iPurpose)
sRes is string = objExtraction>>TextEncodeFIR
objExtraction>>Capture(iPurpose)
sRes1 is string = objExtraction>>TextEncodeFIR
objMatching is object OLE dynamic
objMatching = objNBio>>Matching
objMatching>>VerifyMatch(sRes,sRes1)
iMatched is int = objMatching>>MatchingResult
IF iMatched THEN
Info("Matched",sRes,sRes1)
ELSE
Info("Not matched",sRes,sRes1)
END
Publicado em setembro, 19 2018 - 1:38 PM
Hello, I am using FingKey on Windev (model: Hamster DX).
Actually the device is connected to the system but when I initiate Capture or Enroll methode, the action screen is opened (from Nitgen) and then nothing works... "Enroll" wizard is stuck in the first screen, "Capture" screen gets the FIR image and then the buttons don't work and the window seems to be freezing...

Could anyone help, please?

Thank you in advance !

João Ricardo a écrit :
My name is João Ricardo and I live in Brazil. Working in the company Psal, Primo Systems Applications Ltda. We use the Windev about 4 years and so far we have managed to develop our systems without major difficulties.
Acquire the biometric reader FingKey Hamster's Nitgen to implement in our system of fingerprint identification.
Along with the equipment received your dll's and sample programs and their sources. The sample programs were developed in Visual Basic 6 and Delphi 6. In tests with the sample programs achieved success in the use of FingKey.
Began the development of routines to access the device using as basis the documentation and the sample programs.
We observed the return of the methods of the dll was not expected, so post in the forum decided that question in an attempt to get some help.
I do not know what may be happening.
Someone has already developed something that could help me?

C++ (Documentation)

NBioAPI_Init() is the function that initializes the NBioBSP module. NBioAPI_Init()
returns the Handle of the NBioBSP module used in the application.

NBioAPI_HANDLE g_hBSP; // NBioBSP module Handle.

// Initialize BSP Module
if ( NBioAPI_Init(&g_hBSP) != NBioAPIERROR_NONE )
{
// Init module failed. Show error message.
}
// Init success.

Windev (my code)

ret is int

hwnd is int = SysWinActive()
IF hwnd = 0 THEN hwnd = Handle()

hInst is int = LoadDLL("NbioBSP.DLL")
IF hInst = 0 THEN
Error("Loading error")
ELSE
// Initialize
ret = CallDLL32("NBioBSP.dll", "NBioAPI_Init", hwnd)
Info("NBioAPI_Init: "+ret)
// OpenDevice
ret = CallDLL32("NBioBSP.dll", "NBioAPI_OpenDevice", hwnd, 1)
Info("NBioAPI_OpenDevice: "+ret)
FreeDLL(hInst)
END

I appreciate any help.
Publicado em setembro, 20 2018 - 6:38 PM
Thank you even I didn't get any answer.
Actually everything worked fine finally...