pre cutover push
This commit is contained in:
Infineon\StieberD
@ -20,12 +20,12 @@ compile insert Msg_Equates
|
||||
* 08/20/15 djh Add EDITMASK fields
|
||||
* 08/28/15 djh Add some documentation on the new fields
|
||||
* 10/15/15 djh Add fields for styleSheets
|
||||
* 03/18/24 MrC Updated for v10.2.2
|
||||
******************************************************************************
|
||||
|
||||
declare subroutine Msg ;* Msg(Parent, MsgDef [, MsgKey, Instruction, Params])
|
||||
declare function Msg ;* Ans = Msg(Parent, MsgDef [, MsgKey, Instruction, Params])
|
||||
|
||||
|
||||
* message structure field definitions
|
||||
equ MTEXT$ to 1 ;* the text to display in the message, multiple lines delimited by @tm, cr/lf, or "|"
|
||||
equ MTYPE$ to 2 ;* the message type, defaults to "BO" (see below)
|
||||
@ -35,8 +35,8 @@ equ MDEFBTN$ to 5 ;* default button (1 for first, 2 for second, et
|
||||
equ MCOL$ to 6 ;* message h-pos in pixels, or -2 (center screen, the default), -1 (center parent)
|
||||
equ MROW$ to 7 ;* message v-pos in pixels
|
||||
equ MJUST$ to 8 ;* justification: T (text, the default), L (left), R (right), C (center)
|
||||
equ MBKCOLOR$ to 9 ;* background color (RGB value, @vm-delimited), see Utility("CHOOSECOLOR")
|
||||
Equ MFGCOLOR$ To 10 ;* foreground color (RGB value, @vm-delimited), see Utility("CHOOSECOLOR") - DO NOT USE - Use the color from the font structure
|
||||
equ MBKCOLOR$ to 9 ;* background color - COLORREF value (not @vm-delimited RGB!)
|
||||
Equ MFGCOLOR$ To 10 ;* foreground color - COLORREF value (not @vm-delimited RGB!)
|
||||
equ MTEXTWIDTH$ to 11 ;* the message width (or the response field width for response messages)
|
||||
equ MCAPTION$ to 12 ;* the message title
|
||||
equ MVALID$ to 13 ;* for response messages, this is the validation pattern (ie. (MD0) for integer)
|
||||
@ -55,24 +55,24 @@ Equ MGSMOOTH$ To 25 ;* boolean, set to true to see a smooth gauge an
|
||||
Equ MGPERCOMPLETE$ To 26 ;* boolean, set to true to see the percent complete in the gauge
|
||||
Equ MGSYNCTASK$ To 27 ;* boolean, set to true to mirror the state of the gauge on the taskbar
|
||||
Equ MGVERTICAL$ To 28 ;* boolean, set to true to see a vertical gauge
|
||||
Equ MGINCREMENT$ To 29 ;* integer, set the number to increment the gauge by
|
||||
Equ MGTRANSLUCENT$ To 30 ;* integer, set the transparency of the gauge with 0 being fully apaque and 100 being fully transparent
|
||||
Equ MGINCREMENT$ To 29 ;*** DEPRECATED *** integer, set the number to increment the gauge by
|
||||
Equ MGTRANSLUCENT$ To 30 ;*** DEPRECATED *** integer, set the transparency of the gauge with 0 being fully apaque and 100 being fully transparent
|
||||
Equ MGNORMALSTATE$ To 31 ;* gauge normal state color (RGB value, @vm-delimited), see Utility("CHOOSECOLOR")
|
||||
Equ MGERRORSTATE$ To 32 ;* gauge error state color (RGB value, @vm-delimited), see Utility("CHOOSECOLOR")
|
||||
Equ MGPAUSEDSTATE$ To 33 ;* gauge paused state color (RGB value, @vm-delimited), see Utility("CHOOSECOLOR")
|
||||
Equ MGMARQUEE$ To 34 ;* integer, time in milliseconds between marquee animation
|
||||
Equ MGSTARTVALUE$ To 35 ;* integer, set the start value for the gauge, must be between the range values
|
||||
Equ MGRANGESTART$ To 36 ;* integet, set the lower limit of the gauge
|
||||
Equ MGRANGESTART$ To 36 ;* integer, set the lower limit of the gauge
|
||||
Equ MGRANGEEND$ To 37 ;* integer, set the upper limit of the gauge
|
||||
Equ MGDECREMENT$ To 38 ;* boolean, set to true to decrement the gauge
|
||||
Equ MGDECREMENT$ To 38 ;*** DEPRECATED *** boolean, set to true to decrement the gauge
|
||||
Equ MPWDPEEK$ To 39 ;* integer, time in milliseconds to display the entered character before masking
|
||||
Equ MVALIDCHARS$ To 40 ;* for response messages, these are the characters that are valid
|
||||
Equ MANIMATE$ To 41 ;* animation file name to use with the gauge (see list below for options)
|
||||
Equ MPOPUP$ To 42 ;* boolean, for timed messages set to true to see a popup "toast" message in the lower right hand corner of the screen
|
||||
Equ MFRAME$ To 43 ;* integer, set type of frame (see list below for options)
|
||||
Equ MHTML$ To 44 ;* boolean, set to true for HTML text rendering
|
||||
Equ MMAINFGCOLOR$ To 45 ;* main text foreground color (RGB value, @vm-delimited), see Utility("CHOOSECOLOR")
|
||||
Equ MMAINBKCOLOR$ To 46 ;* main text background color (RGB value, @vm-delimited), see Utility("CHOOSECOLOR")
|
||||
Equ MMAINFGCOLOR$ To 45 ;* main text foreground color - COLORREF value (not @vm-delimited RGB!)
|
||||
Equ MMAINBKCOLOR$ To 46 ;*** DEPRECATED *** main text background color - COLORREF value (not @vm-delimited RGB!)
|
||||
Equ MMAINTEXT$ To 47 ;* main text to appear above the regular text
|
||||
Equ MMASKFORMAT$ To 48 ;* edit mask format to be used on response line
|
||||
Equ MMASKTYPE$ To 49 ;* edit mask character type required for each character of the edit mask format (see list below for options)
|
||||
@ -175,7 +175,7 @@ equ MNUMFIELDS$ to 60
|
||||
* ----------- ----------- -----------------------------
|
||||
* W Window only the parent is disabled
|
||||
* A (default) Application all OI windows are disabled
|
||||
* S System all applications are disabled
|
||||
* S System all applications are disabled <-- Unsupported since Windows 3.1!!
|
||||
|
||||
* MICON$ detail:
|
||||
*
|
||||
@ -226,6 +226,9 @@ equ MNUMFIELDS$ to 60
|
||||
* Msg(@window, "Hello, %1%, how are you %2%?", "", "", @username: @fm: "today")
|
||||
|
||||
* MANIMATE$ details:
|
||||
*
|
||||
* Should be an MMEDIA*AVI repository type or one of the
|
||||
* DEPRECATED hardcoded filenames below:
|
||||
*
|
||||
* Value Description
|
||||
* -------------------- ----------------
|
||||
@ -244,8 +247,8 @@ equ MNUMFIELDS$ to 60
|
||||
* Fixed
|
||||
* Sizeable
|
||||
* Dialog
|
||||
* Fixed Tool
|
||||
* Sizeable Tool
|
||||
* Fixed Tool - DEPRECATED
|
||||
* Sizeable Tool - DEPRECATED
|
||||
|
||||
* MMASKTYPE$ details:
|
||||
*
|
||||
@ -262,20 +265,6 @@ equ MNUMFIELDS$ to 60
|
||||
* * Any printable character
|
||||
* + A "+" character, a "-" character, or space
|
||||
|
||||
* Msg() function instruction values
|
||||
equ MSGINSTSTART$ to 1 ;* (default instruction)
|
||||
equ MSGINSTREAD$ to 2 ;* bErr = Msg("", MsgDef, MsgID, MSGINSTREAD$)
|
||||
equ MSGINSTWRITE$ to 3 ;* bErr = Msg("", MsgDef, MsgID, MSGINSTWRITE$)
|
||||
equ MSGINSTLOCK$ to 4 ;* bErr = Msg("", "", MsgID, MSGINSTLOCK$)
|
||||
equ MSGINSTUNLOCK$ to 5 ;* bErr = Msg("", "", MsgID, MSGINSTUNLOCK$)
|
||||
equ MSGINSTBUTTON$ to 6 ;* reserved
|
||||
equ MSGINSTCREATE$ to 7 ;* reserved
|
||||
equ MSGINSTRESPCHG$ to 8 ;* reserved
|
||||
equ MSGINSTCLOSE$ to 9 ;* reserved
|
||||
equ MSGINSTTIMER$ to 10 ;* reserved
|
||||
equ MSGINSTHELP$ to 11 ;* reserved
|
||||
equ MSGINSTUPDATE$ to 12 ;* (see above)
|
||||
|
||||
* Msg() function return values from MSGINSTSTART$
|
||||
equ RET_OK$ to ""
|
||||
equ RET_CANCEL$ to \1B\ ;* escape character
|
||||
@ -289,3 +278,22 @@ equ RET_IGNORE$ to 3
|
||||
equ MSGTYPE$ to "MSG"
|
||||
equ MSGCLASS$ to ""
|
||||
|
||||
// Msg() function instruction values
|
||||
equ MSGINSTSTART$ to 1 ;* (default instruction)
|
||||
equ MSGINSTREAD$ to 2 ;* bErr = Msg("", MsgDef, MsgID, MSGINSTREAD$)
|
||||
equ MSGINSTWRITE$ to 3 ;* bErr = Msg("", MsgDef, MsgID, MSGINSTWRITE$)
|
||||
equ MSGINSTLOCK$ to 4 ;* bErr = Msg("", "", MsgID, MSGINSTLOCK$)
|
||||
equ MSGINSTUNLOCK$ to 5 ;* bErr = Msg("", "", MsgID, MSGINSTUNLOCK$)
|
||||
equ MSGINSTBUTTON$ to 6 ;* reserved
|
||||
equ MSGINSTCREATE$ to 7 ;* reserved
|
||||
equ MSGINSTRESPCHG$ to 8 ;* reserved
|
||||
equ MSGINSTCLOSE$ to 9 ;* reserved
|
||||
equ MSGINSTTIMER$ to 10 ;* reserved
|
||||
equ MSGINSTHELP$ to 11 ;* reserved
|
||||
equ MSGINSTUPDATE$ to 12 ;* (see above)
|
||||
equ MSGINSTEXEC$ to 13
|
||||
equ MSGINSTCOPYTEXT$ to 14
|
||||
equ MSGINSTPURGEALL$ to 15
|
||||
|
||||
equ MSGINST_LAST$ to MSGINSTPURGEALL$
|
||||
|
||||
|
||||
Reference in New Issue
Block a user