TTypeInfo = record
  Kind: TTypeKind;
  Name: ShortString;
end;

struct TTypeInfo {
  TTypeKind Kind;
  ShortString Name;
};