TXvEvent

type TXvEvent = record

  case LongInt of

    0: (

        _type: cint;

      );

    1: (

        xvvideo: TXvVideoNotifyEvent;

      );

    2: (

        xvport: TXvPortNotifyEvent;

      );

    3: (

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

      );

end;