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

  idanimaterobot2 = 684; { $02ac }

type

  tcardid = cardinal; { win32 - 31-bit unsigned integer

  win16 - 16-bit unsigned integer }

  tcardmode = (mode1, mode2, mode3, mode4, mode5, mode6, mode7, mode8, mode9);

  { win32 - 31-bit unsigned integer

win16 - 16-bit unsigned integer }

  tcoordinate = integer; { win32 - 32-bit signed integer

  win16 - 16-bit signed integer }