【二】软件开发常用硬件 - 指纹仪调用

矮又肥

原创纯源码。
很久前写的项目，指纹仪调用，方法在里面至于你想怎么改成其他形式，自己动脑吧。
没什么，就是dll调用，不会的朋友可以看看学习，高高手勿喷。
在此也希望能找到，志同道合的易友一起发展。
联系QQ：82525837

内容清单：
Biokey.ocx，主程序.e，data.mdb，Biokey.npk
这个源码需要一定基础，而且注册过ocx，写的代码只能用那个版本的支持库。谨记。



中控的指纹仪（uru2000）其它型号大同小异。
使用前步骤：如下图

















操蛋事情，我把这个界面的代码支持库，弄丢了，幸好有个代码备份，有方法自己改改。

1. .版本 2
   
2. .支持库 Biokey
   
3. .支持库 iext
   
4. .支持库 eDB
   
5. 
   
6. .程序集 窗口程序集1
   
7. .程序集变量 FMatchType, 整数型
   
8. .程序集变量 fpcHandle, 整数型
   
9. .程序集变量 指纹数据, 文本型
   
10. 
    
11. .子程序 _窗口_指纹管理_创建完毕
    
12. 
    
13. .判断开始 (指纹控件.InitEngine () ＝ 0)  ' 初始化判断
    
14.     指纹数据 ＝ 指纹控件.SensorSN
    
15.     状态条.置文本 (0, “指纹仪序列号:” ＋ 到文本 (指纹控件.SensorIndex))
    
16.     状态条.置文本 (1, “指纹仪个数:” ＋ 到文本 (指纹控件.SensorCount))
    
17.     ' 状态条.置文本 (2, “当前使用:” ＋ 到文本 (ZKFPEngX1.SensorIndex))
    
18. .默认
    
19.     信息框 (“初始化硬件失败。”, 0, )
    
20.     结束 ()
    
21. .判断结束
    
22. .如果真 (数据库连接.连接SQLServer (“127.0.0.1”, “jhzw”, “sa”, “123”) ＝ 假)
    
23.     信息框 (“连接数据库失败.”, 0, )
    
24.     返回 ()
    
25. .如果真结束
    
26. 记录集.置连接 (数据库连接)
    
27. 初始化程序 ()
    
28. 
    
29. 
    
30. .子程序 _按钮_浏览_被单击
    
31. 
    
32. .如果真 (通用对话框.打开 () ＝ 真)
    
33.     图片框_头像.图片 ＝ 读入文件 (通用对话框.文件名)
    
34. .如果真结束
    
35. 
    
36. 
    
37. .子程序 初始化程序
    
38. .局部变量 次数, 整数型
    
39. .局部变量 临时变量, 文本型
    
40. .局部变量 索引, 整数型
    
41. 
    
42. .如果真 (记录集.打开 (“select * from zhuwenxinxi”, #SQL语句) ＝ 假)
    
43.     信息框 (“连接数据表失败”, 0, )
    
44.     结束 ()
    
45. .如果真结束
    
46. .计次循环首 (记录集.记录数量, 次数)
    
47.     记录集.读文本 (“gonghao”, 临时变量)
    
48.     索引 ＝ 超级列表框_指纹库.插入表项 (, , , , , )
    
49.     超级列表框_指纹库.置标题 (索引, 0, 临时变量)
    
50. 
    
51. 
    
52.     记录集.读文本 (“touxiang”, 临时变量)
    
53.     图片框_头像.图片 ＝ 到字节集 (临时变量)
    
54. 
    
55. 
    
56.     记录集.读文本 (“xingming”, 临时变量)
    
57.     超级列表框_指纹库.置标题 (索引, 1, 临时变量)
    
58. 
    
59.     记录集.读文本 (“shouji”, 临时变量)
    
60.     超级列表框_指纹库.置标题 (索引, 2, 临时变量)
    
61. 
    
62. 
    
63.     记录集.读文本 (“zhiwen1”, 临时变量)
    
64.     .如果 (临时变量 ≠ “”)
    
65.         超级列表框_指纹库.置标题 (索引, 3, “登记”)
    
66.     .否则
    
67.         超级列表框_指纹库.置标题 (索引, 3, “未登记”)
    
68.     .如果结束
    
69. 
    
70.     记录集.读文本 (“zhiwen2”, 临时变量)
    
71.     .如果 (临时变量 ≠ “”)
    
72.         超级列表框_指纹库.置标题 (索引, 4, “登记”)
    
73.     .否则
    
74.         超级列表框_指纹库.置标题 (索引, 4, “未登记”)
    
75.     .如果结束
    
76. 
    
77.     记录集.读文本 (“dengjirqi”, 临时变量)
    
78.     超级列表框_指纹库.置标题 (索引, 5, 临时变量)
    
79.     记录集.到下一条 ()
    
80. .计次循环尾 ()
    
81. 记录集.关闭 ()
    
82. 
    
83. .子程序 _按钮_登记指纹_被单击
    
84. 
    
85. .如果真 (编辑框_姓名.内容 ＝ “”)
    
86.     信息框 (“请填写用户。”, 0, )
    
87.     返回 ()
    
88. .如果真结束
    
89. .如果真 (编辑框_工号.内容 ＝ “”)
    
90.     信息框 (“请填写用户编号。”, 0, )
    
91.     返回 ()
    
92. .如果真结束
    
93. .如果真 (图片框_头像.图片 ＝ {  })
    
94.     信息框 (“请选择图片”, 0, )
    
95.     返回 ()
    
96. .如果真结束
    
97. .如果真 (编辑框_手机.内容 ＝ “”)
    
98.     信息框 (“请输入手机号码。”, 0, )
    
99.     返回 ()
    
100. .如果真结束
     
101. 编辑框_日期.内容 ＝ 到文本 (取现行时间 ())
     
102. 指纹控件.BeginEnroll ()
     
103. 透明标签_状态.标题 ＝ “请输入3次指纹。”
     
104. 
     
105. .子程序 _窗口_指纹管理_将被销毁
     
106. 
     
107. 指纹控件.EndEngine ()
     
108. 
     
109. .子程序 _指纹控件_OnEnroll
     
110. .参数 ActionResult1, 逻辑型
     
111. .参数 ATemplate, 变体型
     
112. .局部变量 索引, 整数型
     
113. .局部变量 次数, 整数型
     
114. .局部变量 临时变量, 文本型
     
115. .局部变量 sql, 文本型
     
116. 
     
117. 指纹数据 ＝ 指纹控件.GetTemplateAsString ()
     
118. .如果 (ActionResult1)
     
119.     透明标签_状态.标题 ＝ “注册成功”
     
120.     索引 ＝ 超级列表框_指纹登记.插入表项 (, , , , , )
     
121.     超级列表框_指纹登记.置标题 (索引, 0, 编辑框_工号.内容)
     
122.     超级列表框_指纹登记.置标题 (索引, 1, 编辑框_姓名.内容)
     
123.     .如果真 (组合框.现行选中项 ＝ 0)
     
124. 
     
125.         sql ＝ “insert into zhuwenxinxi(touxiang, gonghao, xingming, shouji,zhiwen1,dengjirqi) values('” ＋ 到文本 (图片框_头像.图片) ＋ “', '” ＋ 编辑框_工号.内容 ＋ “', '” ＋ 编辑框_姓名.内容 ＋ “', '” ＋ 编辑框_手机.内容 ＋ “', '” ＋ 指纹数据 ＋ “', '” ＋ 编辑框_日期.内容 ＋ “')”
     
126.         输出调试文本 (数据库连接.执行SQL (sql))
     
127.     .如果真结束
     
128.     .如果真 (组合框.现行选中项 ＝ 1)
     
129.         数据库连接.执行SQL (“update zhuwenxinxi set zhiwen2='” ＋ 指纹数据 ＋ “' where gonghao='” ＋ 编辑框_工号.内容 ＋ “'”)
     
130.     .如果真结束
     
131.     .如果 (组合框.现行选中项 ＝ 0)
     
132.         超级列表框_指纹登记.置标题 (索引, 2, “录入成功”)
     
133.         超级列表框_指纹登记.置标题 (索引, 3, 编辑框_日期.内容)
     
134.         编辑框_日期.内容 ＝ “”
     
135.         图片框_指纹.图片 ＝ {  }
     
136.         透明标签_状态.标题 ＝ “”
     
137.         组合框.现行选中项 ＝ 1
     
138.     .否则
     
139.         超级列表框_指纹登记.置标题 (索引, 2, “录入成功”)
     
140.         超级列表框_指纹登记.置标题 (索引, 3, 编辑框_日期.内容)
     
141.         编辑框_姓名.内容 ＝ “”
     
142.         编辑框_工号.内容 ＝ “”
     
143.         图片框_头像.图片 ＝ {  }
     
144.         编辑框_日期.内容 ＝ “”
     
145.         图片框_指纹.图片 ＝ {  }
     
146.         透明标签_状态.标题 ＝ “”
     
147.         组合框.现行选中项 ＝ 0
     
148.     .如果结束
     
149. 
     
150. 
     
151.     .' 如果真 (记录集.打开 (“select * from zhuwenxinxi”, #SQL语句) ＝ 假)
     
152.         ' 信息框 (“连接数据表失败”, 0, )
     
153.         ' 结束 ()
     
154.     .如果真结束
     
155.     .' 如果真 (组合框.现行选中项 ＝ 0)
     
156.         ' 记录集.添加 ()
     
157.         ' 记录集.写文本 (“gonghao”, 编辑框_工号.内容)
     
158.         ' 记录集.写文本 (“xingming”, 编辑框_姓名.内容)
     
159.         ' 记录集.写文本 (“shouji”, 编辑框_手机.内容)
     
160.         ' 记录集.写文本 (“zhiwen1”, 指纹数据)
     
161.         ' 记录集.写文本 (“dengjirqi”, 编辑框_日期.内容)
     
162.     .如果真结束
     
163.     .' 如果真 (组合框.现行选中项 ＝ 1)
     
164.         .' 计次循环首 (记录集.记录数量, 次数)
     
165.             ' 记录集.读文本 (“gonghao”, 临时变量)
     
166.             .' 如果真 (临时变量 ＝ 编辑框_工号.内容)
     
167.                 ' 记录集.写文本 (“zhiwen2”, 指纹数据)
     
168.                 ' 跳出循环 ()
     
169.             .如果真结束
     
170.             ' 记录集.到下一条 ()
     
171.         .' 计次循环尾 ()
     
172.     .如果真结束
     
173.     ' 记录集.更新 ()
     
174.     ' 记录集.关闭 ()
     
175. .否则
     
176.     透明标签_状态.标题 ＝ “注册失败”
     
177. .如果结束
     
178. 
     
179. 
     
180. .子程序 图片到二进制, 文本型
     
181. .参数 图片数据, 字节集
     
182. .局部变量 tempText, 文本型
     
183. .局部变量 n, 整数型
     
184. 
     
185. .变量循环首 (取字节集长度 (图片数据), 1, -1, n)
     
186.     tempText ＝ 到文本 (图片数据 [n]) ＋ “|” ＋ tempText
     
187. .变量循环尾 ()
     
188. 返回 (tempText)
     
189. 
     
190. .子程序 _指纹控件_OnFeatureInfo
     
191. .参数 AQuality, 整数型
     
192. 
     
193. .如果真 (指纹控件.IsRegister)  ' 输入消息
     
194.     透明标签_状态.标题 ＝ “还要输入” ＋ 到文本 (指纹控件.EnrollIndex － 1) ＋ “次”  ' <!!!>
     
195. .如果真结束
     
196. 
     
197. 
     
198. .子程序 _指纹控件_OnImageReceived
     
199. .参数 AImageValid, 逻辑型, 参考
     
200. 
     
201. 指纹控件.PrintImageAt (获取DC句柄 (图片框_指纹.取窗口句柄 ()), 图片框_指纹.顶边, 图片框_指纹.左边, 图片框_指纹.宽度, 图片框_指纹.高度)
     
202. 
     
203. .子程序 _指纹控件_OnCapture
     
204. .参数 ActionResult, 逻辑型
     
205. .参数 ATemplate, 变体型
     
206. .局部变量 返回数据, 文本型
     
207. .局部变量 注册改变, 逻辑型
     
208. 
     
209. 返回数据 ＝ 指纹控件.GetTemplateAsString ()
     
210. .如果真 (FMatchType ＝ 1)
     
211.     .如果 (指纹控件.VerFingerFromStr (指纹数据, 返回数据, 假, 注册改变))  ' 开始对比数据
     
212.         信息框 (“对比成功”, 0, )
     
213.     .否则
     
214.         信息框 (“对比失败”, 0, )
     
215.     .如果结束
     
216. 
     
217. .如果真结束
     
218. 
     
219. 
     

复制代码

常见问题：



遇到这样的问题，只能重新注册ocx，或者找你原始的注册的生成的Biokey.npk

--------------------------------------分割线--------------------------------------------
看了不会，木有小鸡鸡。


指纹仪.rar (644.95 KB, 下载次数: 249)

2013-8-10 10:17 上传

点击文件名下载附件



百度云网盘：驱动及文档请到网盘下载
http://pan.baidu.com/share/link?shareid=3792442064&uk=2838843340
备份地址：http://urlxf.qq.com/?vyAfq2y

下期预告：硬币投币器对接，刷卡器，条码枪。






软件开发常用硬件：历史帖子
【一】软件开发常用硬件 - 短信猫的调用
http://bbs.125.la/thread-13666684-1-1.html

douluodalu

好东西，必须支持一下

rgbhje

链接都失效了，不知道会不会补了

314080840

好东西，必须支持一下

80808888

66666666666666666666666666

13804061190

终于可以学习一下指纹开发了

梁业

终于可以学习一下指纹开发了

zhang345415

你你你6秒后面

zhang345415

你你你你精灵联盟

烟斗

请问指纹仪价格大概多少、能不能给个链接让研究研究！