Delphi
努力偷懒
为了可以偷懒而努力去思考再思考,努力把每一个模块封装好,可以让其在更多的地方复用,再复用,让我可以有更多时间去偷懒。
展开
-
检测ID卡的输入或者是其它卡的输入。
由于ID卡或者是其它的一些不同类型的卡,它们只是负责模拟键盘的录入,但是,它们在录入的时候没有一个很好的标识位可以让我们知道当前输入的是客户手工录入的字符串还是ID卡读入的字符串,我相信,很多人在做这样的开发时应该都遇到过这种郁闷的事,有些人的做法呢,就是在特定的位置录入字符串就算是ID卡的读取了,我想,这样的方法很多人都不喜欢的了,感觉很不科学。因此,这模块就是应这种要求而设计的,可以让你在原创 2008-02-24 19:34:00 · 1507 阅读 · 0 评论 -
ID卡读取方法(用于区分ID卡读取出来的数据和一般人手录入的数据)
ID卡的读取方式其实是模拟一个键盘的录入而已,很简单,现在这个ID卡读取方法是为了在任何情况下把它正确读取出来的方法,例如你在tedit控件里面,当读取了ID卡时,会和其它数据混在一起,而我这种方法,能正确地读取出ID卡的正确数据,如果你同时快速按键盘又同时读取ID卡时,它是不会读出数据的,这样是为了防止读出来的数据不正确。不多说,下面是代码,还有测试用的代码一起的,我就不改了,大家可参考一下原创 2008-01-07 12:32:00 · 16153 阅读 · 0 评论 -
在TDBGrid控件中为作修改过的记录进行标识!
unit testDBG;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, Grids, DBGrids, DB, ADODB, StdCtrls,Types;type TForm1 = class(TForm)原创 2004-05-21 14:27:00 · 1074 阅读 · 0 评论