Notify.def: Translation to Stony Brook Modula-2

Last updated: 30.12.1997, 10:28

DEFINITION MODULE Notify;
(*---------------------------------------
   NOTIFY.C     -- Gadgets for a frame window.
                   (c) Paul Yao, 1996
   Notify.mod   -- Translation to Stony Brook-Modula-2
                   (c) Peter Stadler, 1997
  ---------------------------------------*)

IMPORT WINUSER;
IMPORT WINGDI;
IMPORT WIN32;
IMPORT WINX;
IMPORT SYSTEM;
IMPORT COMMCTRL;
IMPORT comcthlp;
TYPE
  CONTROLNOTIFICATIONS = RECORD
                           nCode : INTEGER;
                           pName : WIN32.LPSTR;
                         END;
TYPE
  cnLookupTableArray = ARRAY[0..91] OF CONTROLNOTIFICATIONS;

VAR
NOTIFY_COUNT  : INTEGER;

VAR
     cnLookupTable : cnLookupTableArray; 

(*-------------------------------------------------------------------*)
(* QueryNotifyText: Convert notification codes into text.*)
(*-------------------------------------------------------------------*)
(*++++*****************************************************************)
PROCEDURE QueryNotifyText (nNotifyCode : CARDINAL; pName : WIN32.LPSTR) : BOOLEAN;
(**********************************************************************)
END Notify.