TPARMBLK

type TPARMBLK = record

  pb_tree: PAESTree;

  pb_obj: SmallInt;

  pr_prevstate: SmallInt;

  pr_currstate: SmallInt;

  pb_x: SmallInt;

  pb_y: SmallInt;

  pb_w: SmallInt;

  pb_h: SmallInt;

  pb_xc: SmallInt;

  pb_yc: SmallInt;

  pb_wc: SmallInt;

  pb_hc: SmallInt;

  pb_parm: LongInt;

end;