From: <th...@us...> - 2002-12-15 14:23:46
|
Update of /cvsroot/ro-oslib/OSLib/!OsLib/Source/User/oslib In directory sc8-pr-cvs1:/tmp/cvs-serv20388/Source/User/oslib Modified Files: Wimp.swi Log Message: Added Message_ScreenEdgeNotification. Index: Wimp.swi =================================================================== RCS file: /cvsroot/ro-oslib/OSLib/!OsLib/Source/User/oslib/Wimp.swi,v retrieving revision 1.10 retrieving revision 1.11 diff -C2 -d -r1.10 -r1.11 *** Wimp.swi 2 Dec 2002 18:28:14 -0000 1.10 --- Wimp.swi 15 Dec 2002 14:23:44 -0000 1.11 *************** *** 382,403 **** //WIMP messages (these must be cast) CONST ! Message_MenuWarning = .Bits: 0x400C0, ! Message_ModeChange = .Bits: 0x400C1, ! Message_TaskInitialise = .Bits: 0x400C2, ! Message_TaskCloseDown = .Bits: 0x400C3, ! Message_SlotSize = .Bits: 0x400C4, ! Message_SetSlot = .Bits: 0x400C5, ! Message_TaskNameRq = .Bits: 0x400C6, ! Message_TaskNameIs = .Bits: 0x400C7, ! Message_TaskStarted = .Bits: 0x400C8, ! Message_MenusDeleted = .Bits: 0x400C9, ! Message_Iconise = .Bits: 0x400CA, ! Message_WindowClosed = .Bits: 0x400CB, ! Message_WindowInfo = .Bits: 0x400CC, ! Message_Swap = .Bits: 0x400CD, ! Message_ToolsChanged = .Bits: 0x400CE, ! Message_FontChanged = .Bits: 0x400CF, ! Message_IconiseAt = .Bits: 0x400D0 "RISC O S 4+", ! Message_ToggleBackdrop = .Bits: 0x400D1 "RISC O S 4.20+"; //Flags for Wimp_DragBox - RISC O S 4+ --- 382,404 ---- //WIMP messages (these must be cast) CONST ! Message_MenuWarning = .Bits: 0x400C0, ! Message_ModeChange = .Bits: 0x400C1, ! Message_TaskInitialise = .Bits: 0x400C2, ! Message_TaskCloseDown = .Bits: 0x400C3, ! Message_SlotSize = .Bits: 0x400C4, ! Message_SetSlot = .Bits: 0x400C5, ! Message_TaskNameRq = .Bits: 0x400C6, ! Message_TaskNameIs = .Bits: 0x400C7, ! Message_TaskStarted = .Bits: 0x400C8, ! Message_MenusDeleted = .Bits: 0x400C9, ! Message_Iconise = .Bits: 0x400CA, ! Message_WindowClosed = .Bits: 0x400CB, ! Message_WindowInfo = .Bits: 0x400CC, ! Message_Swap = .Bits: 0x400CD, ! Message_ToolsChanged = .Bits: 0x400CE, ! Message_FontChanged = .Bits: 0x400CF, ! Message_IconiseAt = .Bits: 0x400D0 "RISC O S 4+", ! Message_ToggleBackdrop = .Bits: 0x400D1 "RISC O S 4.20+", ! Message_ScreenEdgeNotification = .Bits: 0x400D2 "RISC O S 4.20+"; //Flags for Wimp_DragBox - RISC O S 4+ *************** *** 1029,1032 **** --- 1030,1042 ---- TYPE + Wimp_ScreenEdgeNotificationFlags = .Bits; + + CONST + Wimp_ScreenEdgeNotificationLeft = Wimp_ScreenEdgeNotificationFlags: 0x1, + Wimp_ScreenEdgeNotificationBottom = Wimp_ScreenEdgeNotificationFlags: 0x2, + Wimp_ScreenEdgeNotificationRight = Wimp_ScreenEdgeNotificationFlags: 0x4, + Wimp_ScreenEdgeNotificationTop = Wimp_ScreenEdgeNotificationFlags: 0x8; + + TYPE Wimp_MessageMenuWarning = .Struct *************** *** 1120,1123 **** --- 1130,1138 ---- ), + Wimp_MessageScreenEdgeNotification = + .Struct + ( Wimp_ScreenEdgeNotificationFlags: flags + ), + // New style Message Blocks *************** *** 1216,1219 **** --- 1231,1239 ---- .Struct: Wimp_MessageHeader ( Wimp_ToggleBackdropFlags: flags + ), + + Wimp_FullMessageScreenEdgeNotification = + .Struct: Wimp_MessageHeader + ( Wimp_ScreenEdgeNotificationFlags: flags ); |