TParamInfo = packed record
  Flags: TParamFlags;
  ParamType: ^PTypeInfo;
  Access: Word;
  Name: ShortString;
end;

struct TParamInfo {
  TParamFlags Flags;
  ^PTypeInfo ParamType;
  Word Access;
  ShortString Name;
};