pwdkey.pas

来自「公司ERP系统」· PAS 代码 · 共 16 行

unit pwdkey;

interface
uses Forms, DB, DBTables,DBCtrls, Controls, StdCtrls,
     ExtCtrls, Classes, Graphics, DBGrids;

procedure get_pwdkey(var i,j:integer);

implementation

const gdir = '\pidpr\ttmis\pub\proj\pwdkeyd' ;  {.dll}

procedure get_pwdkey(var i,j:integer);external gdir;

end.