TMethodInfoHeader = packed record
  Len: Word;
  Addr: Pointer;
  Name: ShortString;
end;

struct TMethodInfoHeader {
  Word Len;
  void * Addr;
  ShortString Name;
};