TScreenNotifyMessage

type TScreenNotifyMessage = record

  snm_Message: PMagicMessage;

  snm_Class: LongWord;

Notification Class ID same as SNA_Notify

  snm_Code: LongWord;

Code only supported for ScreenDepth() and will put the Flags in

  snm_Object: NativeUInt;

Pointer to the Object that caused this message

  snm_UserData: NativeUInt;

will be filled with SNA_UserData

end;