TgpHitTest

type TgpHitTest = record

  MethodID: LongWord;

GM_HITTEST or GM_HELPTEST

  gpht_GInfo: PGadgetInfo;

  gpht_Mouse: record

These values are relative to the gadget select box for GM_HITTEST. For

    x: SmallInt;

    y: SmallInt;

  end;

end;