TStructMember = record
  Name: string;
  TC: ITypeCode;
end;

struct TStructMember {
  AnsiString Name;
  ITypeCode TC;
};