Hi.
Has anyone used an electronic signature pad with fw? Any recommendations?
Thank you,
Reinaldo.
FiveTech Support Forums
FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Electronic Signature Pad
Reinaldo,
A few years ago I did some testing with Topaz ActiveX under xHarbour and FWH.
The Signature pad worked fine.
Regards,
George
I think I will order a Topaz signature pad for testing. Thank you.
Reinaldo.
Hi Reinaldo,
We have also used the epad ink pad as well.
http://www.epadlink.com/index.php
Best regards,
Pete
Hello everyone;
I just got my Topaz signature pad for testing. Does anyone have any code that I can see to get started using the Topaz OCX to capture a signature?
Thank you,
Reinaldo.
Reinaldo,
Review this code:
Regards,
George
Review this code:
lFound := IsActivex("SIGSIGN.SigSignCtrl.1")
IF lFound = FALSE
IF lMessage := MsgYesNo("TOPAZ signature pad is not installed." + CHR(13)+;
"Do you want to cancel signature?", 'WARNING')
RETURN FALSE
ENDIF
ENDIF
oActive = TActiveX():New( oWnd, "SIGSIGN.SigSignCtrl.1",30,10, 100, 100 )
oActive1 = TActiveX():New( oWnd, "SIGPLUS.SigPlusCtrl.1")
oActive:WindowTitle = "Enter Agent Signature"
lReturn := oActive:GetSignature()
sCstring = oActive:SigString
// --- Create TXT file containing digital signature
nOutHandle := fcreate("AgSign.txt")
if nOutHandle < 0
msginfo("Unable to create AgSign.TXT file")
return FALSE
endif
fwrite(nOutHandle, sCstring)
oActive1:InitSigPlus()
oActive1:SigString = sCstring
oActive1:WriteImageFile(CurrentDirectory()+"\AG_SIGN.BMP")
FClose( nOutHandle )
oActive:End()
oActive1:End()George