TSystemEvent

type TSystemEvent = record

  case typ: TSystemMessage of

    SysClose: (

        CloseTyp: LongInt;

      );

    SysResize: (

        X: LongInt;

        Y: LongInt;

      );

    SysPaste: (

        P: PAnsiChar;

        Len: LongInt;

      );

end;