kzcx910n_5r.pas
来自「感应IC卡电脑考勤、门禁、售饭一卡通管理系统是基于我公司开发生产的ESW型智能卡」· PAS 代码 · 共 38 行
PAS
38 行
unit KzCx910N_5R;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, SPComm, ExtCtrls, ComCtrls;
type
TfrmKzCx910N_5R = class(TForm)
lblMsg: TLabel;
Label1: TLabel;
lblRecNo: TStaticText;
private
{ Private declarations }
public
{ Public declarations }
sTxtFile :string;
nCommPort :integer;
function ReadData(tsMachNo:string):Boolean;
end;
var
frmKzCx910N_5R: TfrmKzCx910N_5R;
implementation
uses KzSunco, KzCx910N_5;
{$R *.DFM}
function TfrmKzCx910N_5R.ReadData(tsMachNo:string):Boolean;
var tsData :TStrings;
tsCardNo :Array[0..60] of char;
i,nCount :integer;
begin
Result :=False;
lblMsg.Caption :='タ
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?