constinfoty

type constinfoty = record

  name: string;

  valuetype: tvaluetype;

  value: msestring;

  resource: Boolean;

  case Integer of

    0: (

        offset: Integer;

        len: Integer;

      );

    1: (

        hash: card32;

      );

end;