TXDGAEvent

type TXDGAEvent = record

  case LongInt of

    0: (

        _type: cint;

      );

    1: (

        xbutton: TXDGAButtonEvent;

      );

    2: (

        xkey: TXDGAKeyEvent;

      );

    3: (

        xmotion: TXDGAMotionEvent;

      );

    4: (

        pad: array [0..23] of clong;

      );

end;