TDataType

type TDataType = (

  dtInt8U = 1,

  dtInt8S = 2,

  dtInt16U = 3,

  dtInt16S = 4,

  dtInt32U = 5,

  dtInt32S = 6,

  dtInt64U = 7,

  dtInt64S = 8,

  dtBool = 9,

  dtAnsiChar = 10,

  dtWideChar = 11,

  dtEnum = 12,

  dtSingle = 13,

  dtDouble = 14,

  dtExtended = 15,

  dtCurrency = 16,

  dtAnsiString = 17,

  dtWideString = 18,

  dtUnicodeString = 19,

  dtObject = 30,

  dtArray = 31

);