?? readcarddef.pas
字號:
unit ReadCardDef;
interface
uses Windows,CardDef;
procedure ReadSingle(Handle: HWND;
var CardNo: PChar; var CardType: smallint; var Balance:Real); stdcall;
procedure WriteCardBalance;StdCall;//回寫射頻卡帳戶余額
function StartNet (Com :integer):Boolean;StdCall;External 'ReadCardPro.dll' Name 'StartNet';
implementation
procedure ReadSingle; External 'ReadCardPro.dll' Name 'ReadSingle';
procedure WriteCardBalance; External 'ReadCardPro.dll' Name 'WriteCardBalance';
end.
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -