纸牌控件的编写(中)[8]

function cdtanimate; external scardsdll name 'cdtanimate';

{$else}

function cdtinit; external scardsdll index 1;

function cdtdraw; external scardsdll index 2;

function cdtdrawext; external scardsdll index 3;

procedure cdtterm; external scardsdll index 4;