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

  rankcount = ranklast - rankfirst + 1;

  idfacefirst = idclubsace;

  idfacelast = idspadesking;

  facecount = idfacelast - idfacefirst;

  suitcount = 4;

  iddeckempty = 53; { $35  }

  iddeckpattern1 = 54; { $36  }