Tweet
Code:
'--------------------------------------------------------------------------
' copied from Wm Burns, some msgs added, might save a bit of typing
'
FUNCTION GetMsgTxt(iMsgNum AS LONG) AS STRING
SELECT CASE iMsgNum
CASE %WM_USER:FUNCTION = "%WM_USER"
CASE %WM_CREATE:FUNCTION = "%WM_CREATE"
CASE %WM_DESTROY:FUNCTION = "%WM_DESTROY"
CASE %WM_ENABLE:FUNCTION = "%WM_ENABLE"
CASE %WM_MOVE:FUNCTION = "%WM_MOVE"
CASE %WM_SIZE:FUNCTION = "%WM_SIZE"
CASE %WM_ACTIVATE:FUNCTION = "%WM_ACTIVATE"
CASE %WM_SHOWWINDOW:FUNCTION = "%WM_SHOWWINDOW"
CASE %WM_SETFOCUS:FUNCTION = "%WM_SETFOCUS"
CASE %WM_KILLFOCUS:FUNCTION = "%WM_KILLFOCUS"
CASE %WM_SETREDRAW:FUNCTION = "%WM_SETREDRAW"
CASE %WM_SETTEXT:FUNCTION = "%WM_SETTEXT"
CASE %WM_GETTEXT:FUNCTION = "%WM_GETTEXT"
CASE %WM_GETTEXTLENGTH:FUNCTION = "%WM_GETTEXTLENGTH"
CASE %WM_PAINT:FUNCTION = "%WM_PAINT"
CASE %WM_CLOSE:FUNCTION = "%WM_CLOSE"
CASE %WM_QUERYENDSESSION:FUNCTION = "%WM_QUERYENDSESSION"
CASE %WM_QUIT:FUNCTION = "%WM_QUIT"
CASE %WM_QUERYOPEN:FUNCTION = "%WM_QUERYOPEN"
CASE %WM_ERASEBKGND:FUNCTION = "%WM_ERASEBKGND"
CASE %WM_SYSCOLORCHANGE:FUNCTION = "%WM_SYSCOLORCHANGE"
CASE %WM_ENDSESSION:FUNCTION = "%WM_ENDSESSION"
CASE %WM_WININICHANGE,%WM_SETTINGCHANGE:FUNCTION = "%WM_WININICHANGE,%WM_SETTINGCHANGE"
CASE %WM_DEVMODECHANGE:FUNCTION = "%WM_DEVMODECHANGE"
CASE %WM_ACTIVATEAPP:FUNCTION = "%WM_ACTIVATEAPP"
CASE %WM_FONTCHANGE:FUNCTION = "%WM_FONTCHANGE"
CASE %WM_TIMECHANGE:FUNCTION = "%WM_TIMECHANGE"
CASE %WM_CANCELMODE:FUNCTION = "%WM_CANCELMODE"
CASE %WM_SETCURSOR:FUNCTION = "%WM_SETCURSOR"
CASE %WM_HELP:FUNCTION = "%WM_HELP"
CASE %WM_MOUSEACTIVATE:FUNCTION = "%WM_MOUSEACTIVATE"
CASE %WM_CHILDACTIVATE:FUNCTION = "%WM_CHILDACTIVATE"
CASE %WM_QUEUESYNC:FUNCTION = "%WM_QUEUESYNC"
CASE %WM_GETMINMAXINFO:FUNCTION = "%WM_GETMINMAXINFO"
CASE %WM_PAINTICON:FUNCTION = "%WM_PAINTICON"
CASE %WM_ICONERASEBKGND:FUNCTION = "%WM_ICONERASEBKGND"
CASE %WM_NEXTDLGCTL:FUNCTION = "%WM_NEXTDLGCTL"
CASE %WM_SPOOLERSTATUS:FUNCTION = "%WM_SPOOLERSTATUS"
CASE %WM_DRAWITEM:FUNCTION = "%WM_DRAWITEM"
CASE %WM_MEASUREITEM:FUNCTION = "%WM_MEASUREITEM"
CASE %WM_DELETEITEM:FUNCTION = "%WM_DELETEITEM"
CASE %WM_VKEYTOITEM:FUNCTION = "%WM_VKEYTOITEM"
CASE %WM_CHARTOITEM:FUNCTION = "%WM_CHARTOITEM"
CASE %WM_SETFONT:FUNCTION = "%WM_SETFONT"
CASE %WM_GETFONT:FUNCTION = "%WM_GETFONT"
CASE %WM_SETHOTKEY:FUNCTION = "%WM_SETHOTKEY"
CASE %WM_GETHOTKEY:FUNCTION = "%WM_GETHOTKEY"
CASE %WM_QUERYDRAGICON:FUNCTION = "%WM_QUERYDRAGICON"
CASE %WM_COMPAREITEM:FUNCTION = "%WM_COMPAREITEM"
CASE %WM_COMPACTING:FUNCTION = "%WM_COMPACTING"
CASE %WM_OTHERWINDOWCREATED:FUNCTION = "%WM_OTHERWINDOWCREATED"
CASE %WM_OTHERWINDOWDESTROYED:FUNCTION = "%WM_OTHERWINDOWDESTROYED"
CASE %WM_COMMNOTIFY:FUNCTION = "%WM_COMMNOTIFY"
CASE %WM_WINDOWPOSCHANGING:FUNCTION = "%WM_WINDOWPOSCHANGING"
CASE %WM_WINDOWPOSCHANGED:FUNCTION = "%WM_WINDOWPOSCHANGED"
CASE %WM_POWER:FUNCTION = "%WM_POWER"
CASE %WM_COPYDATA:FUNCTION = "%WM_COPYDATA"
CASE %WM_CANCELJOURNAL:FUNCTION = "%WM_CANCELJOURNAL"
CASE %WM_NOTIFY:FUNCTION = "%WM_NOTIFY"
CASE %WM_INPUTLANGUAGECHANGEREQUEST:FUNCTION = "%WM_INPUTLANGUAGECHANGEREQUEST"
CASE %WM_INPUTLANGUAGECHANGE:FUNCTION = "%WM_INPUTLANGUAGECHANGE"
CASE %WM_TCARD:FUNCTION = "%WM_TCARD"
CASE %WM_USERCHANGED:FUNCTION = "%WM_USERCHANGED"
CASE %WM_NOTIFYFORMAT:FUNCTION = "%WM_NOTIFYFORMAT"
CASE %WM_CONTEXTMENU:FUNCTION = "%WM_CONTEXTMENU"
CASE %WM_STYLECHANGING:FUNCTION = "%WM_STYLECHANGING"
CASE %WM_STYLECHANGED:FUNCTION = "%WM_STYLECHANGED"
CASE %WM_DISPLAYCHANGE:FUNCTION = "%WM_DISPLAYCHANGE"
CASE %WM_GETICON:FUNCTION = "%WM_GETICON"
CASE %WM_SETICON:FUNCTION = "%WM_SETICON"
CASE %WM_NCCREATE:FUNCTION = "%WM_NCCREATE"
CASE %WM_NCDESTROY:FUNCTION = "%WM_NCDESTROY"
CASE %WM_NCCALCSIZE:FUNCTION = "%WM_NCCALCSIZE"
CASE %WM_NCHITTEST:FUNCTION = "%WM_NCHITTEST"
CASE %WM_NCPAINT:FUNCTION = "%WM_NCPAINT"
CASE %WM_NCACTIVATE:FUNCTION = "%WM_NCACTIVATE"
CASE %WM_GETDLGCODE:FUNCTION = "%WM_GETDLGCODE"
CASE %WM_NCMOUSEMOVE:FUNCTION = "%WM_NCMOUSEMOVE"
CASE %WM_NCLBUTTONDOWN:FUNCTION = "%WM_NCLBUTTONDOWN"
CASE %WM_NCLBUTTONUP:FUNCTION = "%WM_NCLBUTTONUP"
CASE %WM_NCLBUTTONDBLCLK:FUNCTION = "%WM_NCLBUTTONDBLCLK"
CASE %WM_NCRBUTTONDOWN:FUNCTION = "%WM_NCRBUTTONDOWN"
CASE %WM_NCRBUTTONUP:FUNCTION = "%WM_NCRBUTTONUP"
CASE %WM_NCRBUTTONDBLCLK:FUNCTION = "%WM_NCRBUTTONDBLCLK"
CASE %WM_NCMBUTTONDOWN:FUNCTION = "%WM_NCMBUTTONDOWN"
CASE %WM_NCMBUTTONUP:FUNCTION = "%WM_NCMBUTTONUP"
CASE %WM_NCMBUTTONDBLCLK:FUNCTION = "%WM_NCMBUTTONDBLCLK"
CASE %WM_KEYDOWN, %WM_KEYFIRST:FUNCTION = "%WM_KEYDOWN"
CASE %WM_KEYUP:FUNCTION = "%WM_KEYUP"
CASE %WM_CHAR:FUNCTION = "%WM_CHAR"
CASE %WM_DEADCHAR:FUNCTION = "%WM_DEADCHAR"
CASE %WM_SYSKEYDOWN:FUNCTION = "%WM_SYSKEYDOWN"
CASE %WM_SYSKEYUP:FUNCTION = "%WM_SYSKEYUP"
CASE %WM_SYSCHAR:FUNCTION = "%WM_SYSCHAR"
CASE %WM_SYSDEADCHAR:FUNCTION = "%WM_SYSDEADCHAR"
CASE %WM_KEYLAST:FUNCTION = "%WM_KEYLAST"
CASE %WM_INITDIALOG:FUNCTION = "%WM_INITDIALOG"
CASE %WM_COMMAND:FUNCTION = "%WM_COMMAND"
CASE %WM_SYSCOMMAND:FUNCTION = "WM_SYSCOMMAND"
CASE %WM_TIMER:FUNCTION = "%WM_TIMER"
CASE %WM_HSCROLL:FUNCTION = "%WM_HSCROLL"
CASE %WM_VSCROLL:FUNCTION = "%WM_VSCROLL"
CASE %WM_INITMENU:FUNCTION = "%WM_INITMENU"
CASE %WM_INITMENUPOPUP:FUNCTION = "%WM_INITMENUPOPUP"
CASE %WM_MENUSELECT:FUNCTION = "%WM_MENUSELECT"
CASE %WM_MENUCHAR:FUNCTION = "%WM_MENUCHAR"
CASE %WM_ENTERIDLE:FUNCTION = "%WM_ENTERIDLE"
CASE %WM_CTLCOLORMSGBOX:FUNCTION = "%WM_CTLCOLORMSGBOX"
CASE %WM_CTLCOLOREDIT:FUNCTION = "%WM_CTLCOLOREDIT"
CASE %WM_CTLCOLORLISTBOX:FUNCTION = "%WM_CTLCOLORLISTBOX"
CASE %WM_CTLCOLORBTN:FUNCTION = "%WM_CTLCOLORBTN"
CASE %WM_CTLCOLORDLG:FUNCTION = "%WM_CTLCOLORDLG"
CASE %WM_CTLCOLORSCROLLBAR:FUNCTION = "%WM_CTLCOLORSCROLLBAR"
CASE %WM_CTLCOLORSTATIC:FUNCTION = "%WM_CTLCOLORSTATIC"
CASE %WM_MOUSEMOVE,%WM_MOUSEFIRST:FUNCTION = "%WM_MOUSEMOVE"
CASE %WM_LBUTTONDOWN:FUNCTION = "%WM_LBUTTONDOWN"
CASE %WM_LBUTTONUP:FUNCTION = "%WM_LBUTTONUP"
CASE %WM_LBUTTONDBLCLK:FUNCTION = "%WM_LBUTTONDBLCLK"
CASE %WM_RBUTTONDOWN:FUNCTION = "%WM_RBUTTONDOWN"
CASE %WM_RBUTTONUP:FUNCTION = "%WM_RBUTTONUP"
CASE %WM_RBUTTONDBLCLK:FUNCTION = "%WM_RBUTTONDBLCLK"
CASE %WM_MBUTTONDOWN:FUNCTION = "%WM_MBUTTONDOWN"
CASE %WM_MBUTTONUP:FUNCTION = "%WM_MBUTTONUP"
CASE %WM_MBUTTONDBLCLK:FUNCTION = "%WM_MBUTTONDBLCLK"
CASE %WM_MOUSEWHEEL,%WM_MOUSELAST:FUNCTION = "%WM_MOUSEWHEEL"
CASE %WM_PARENTNOTIFY:FUNCTION = "%WM_PARENTNOTIFY"
CASE %WM_ENTERMENULOOP:FUNCTION = "%WM_ENTERMENULOOP"
CASE %WM_EXITMENULOOP:FUNCTION = "%WM_EXITMENULOOP"
CASE %WM_SIZING:FUNCTION = "%WM_SIZING"
CASE %WM_CAPTURECHANGED:FUNCTION = "%WM_CAPTURECHANGED"
CASE %WM_MOVING:FUNCTION = "%WM_MOVING"
CASE %WM_POWERBROADCAST:FUNCTION = "%WM_POWERBROADCAST"
CASE %WM_DEVICECHANGE:FUNCTION = "%WM_DEVICECHANGE"
CASE %WM_MDICREATE:FUNCTION = "%WM_MDICREATE"
CASE %WM_MDIDESTROY:FUNCTION = "%WM_MDIDESTROY"
CASE %WM_MDIACTIVATE:FUNCTION = "%WM_MDIACTIVATE"
CASE %WM_MDIRESTORE:FUNCTION = "%WM_MDIRESTORE"
CASE %WM_MDINEXT:FUNCTION = "%WM_MDINEXT"
CASE %WM_MDIMAXIMIZE:FUNCTION = "%WM_MDIMAXIMIZE"
CASE %WM_MDITILE:FUNCTION = "%WM_MDITILE"
CASE %WM_MDICASCADE:FUNCTION = "%WM_MDICASCADE"
CASE %WM_MDIICONARRANGE:FUNCTION = "%WM_MDIICONARRANGE"
CASE %WM_MDIGETACTIVE:FUNCTION = "%WM_MDIGETACTIVE"
CASE %WM_MDISETMENU:FUNCTION = "%WM_MDISETMENU"
CASE %WM_DROPFILES:FUNCTION = "%WM_DROPFILES"
CASE %WM_MDIREFRESHMENU:FUNCTION = "%WM_MDIREFRESHMENU"
CASE %WM_MOUSEHOVER:FUNCTION = "%WM_MOUSEHOVER"
CASE %WM_MOUSELEAVE:FUNCTION = "%WM_MOUSELEAVE"
CASE %WM_CUT:FUNCTION = "%WM_CUT"
CASE %WM_COPY:FUNCTION = "%WM_COPY"
CASE %WM_PASTE:FUNCTION = "%WM_PASTE"
CASE %WM_CLEAR:FUNCTION = "%WM_CLEAR"
CASE %WM_UNDO:FUNCTION = "%WM_UNDO"
CASE %WM_RENDERFORMAT:FUNCTION = "%WM_RENDERFORMAT"
CASE %WM_RENDERALLFORMATS:FUNCTION = "%WM_RENDERALLFORMATS"
CASE %WM_DESTROYCLIPBOARD:FUNCTION = "%WM_DESTROYCLIPBOARD"
CASE %WM_DRAWCLIPBOARD:FUNCTION = "%WM_DRAWCLIPBOARD"
CASE %WM_PAINTCLIPBOARD:FUNCTION = "%WM_PAINTCLIPBOARD"
CASE %WM_VSCROLLCLIPBOARD:FUNCTION = "%WM_VSCROLLCLIPBOARD"
CASE %WM_SIZECLIPBOARD:FUNCTION = "%WM_SIZECLIPBOARD"
CASE %WM_ASKCBFORMATNAME:FUNCTION = "%WM_ASKCBFORMATNAME"
CASE %WM_CHANGECBCHAIN:FUNCTION = "%WM_CHANGECBCHAIN"
CASE %WM_HSCROLLCLIPBOARD:FUNCTION = "%WM_HSCROLLCLIPBOARD"
CASE %WM_QUERYNEWPALETTE:FUNCTION = "%WM_QUERYNEWPALETTE"
CASE %WM_PALETTEISCHANGING:FUNCTION = "%WM_PALETTEISCHANGING"
CASE %WM_PALETTECHANGED:FUNCTION = "%WM_PALETTECHANGED"
CASE %WM_HOTKEY:FUNCTION = "%WM_HOTKEY"
CASE %WM_PRINTCLIENT:FUNCTION = "%WM_PRINTCLIENT"
CASE %WM_PENWINFIRST:FUNCTION = "%WM_PENWINFIRST"
CASE %WM_PENWINLAST:FUNCTION = "%WM_PENWINLAST"
CASE %WM_ENTERSIZEMOVE:FUNCTION = "WM_ENTERSIZEMOVE"
CASE %WM_EXITSIZEMOVE:FUNCTION = "WM_EXITSIZEMOVE"
CASE %WM_NULL:FUNCTION = "%WM_NULL"
' IME msgs
CASE %WM_IME_STARTCOMPOSITION : FUNCTION = "WM_IME_STARTCOMPOSITION"
CASE %WM_IME_ENDCOMPOSITION : FUNCTION = "WM_IME_ENDCOMPOSITION
CASE %WM_IME_COMPOSITION : FUNCTION = "WM_IME_COMPOSITION
CASE %WM_IME_KEYLAST : FUNCTION = "WM_IME_KEYLAST
CASE %WM_IME_SETCONTEXT : FUNCTION = "WM_IME_SETCONTEXT
CASE %WM_IME_NOTIFY : FUNCTION = "WM_IME_NOTIFY
CASE %WM_IME_CONTROL : FUNCTION = "WM_IME_CONTROL
CASE %WM_IME_COMPOSITIONFULL : FUNCTION = "WM_IME_COMPOSITIONFULL
CASE %WM_IME_SELECT : FUNCTION = "WM_IME_SELECT
CASE %WM_IME_CHAR : FUNCTION = "WM_IME_CHAR
CASE %WM_IME_REQUEST : FUNCTION = "WM_IME_REQUEST
CASE %WM_IME_KEYDOWN : FUNCTION = "WM_IME_KEYDOWN
CASE %WM_IME_KEYUP : FUNCTION = "WM_IME_KEYUP
' button msgs
CASE %BM_GETCHECK: FUNCTION = "%BM_GETCHECK"
CASE %BM_SETCHECK: FUNCTION = "%BM_SETCHECK"
CASE %BM_GETSTATE: FUNCTION = "%BM_GETSTATE"
CASE %BM_SETSTATE: FUNCTION = "%BM_SETSTATE"
CASE %BM_SETSTYLE: FUNCTION = "%BM_SETSTYLE"
CASE %BM_CLICK: FUNCTION = "%BM_CLICK"
CASE %BM_GETIMAGE: FUNCTION = "%BM_GETIMAGE"
CASE %BM_SETIMAGE: FUNCTION = "%BM_SETIMAGE"
' edit msgs
CASE %EM_GETSEL : FUNCTION = "EM_GETSEL"
CASE %EM_SETSEL : FUNCTION = "EM_SETSEL"
CASE %EM_GETRECT : FUNCTION = "EM_GETRECT "
CASE %EM_SETRECT : FUNCTION = "EM_SETRECT "
CASE %EM_SETRECTNP : FUNCTION = "EM_SETRECTNP "
CASE %EM_SCROLL : FUNCTION = "EM_SCROLL"
CASE %EM_LINESCROLL : FUNCTION = "EM_LINESCROLL"
CASE %EM_SCROLLCARET : FUNCTION = "EM_SCROLLCARET "
CASE %EM_GETMODIFY : FUNCTION = "EM_GETMODIFY "
CASE %EM_SETMODIFY : FUNCTION = "EM_SETMODIFY "
CASE %EM_GETLINECOUNT : FUNCTION = "EM_GETLINECOUNT"
CASE %EM_LINEINDEX : FUNCTION = "EM_LINEINDEX "
CASE %EM_SETHANDLE : FUNCTION = "EM_SETHANDLE "
CASE %EM_GETHANDLE : FUNCTION = "EM_GETHANDLE "
CASE %EM_GETTHUMB : FUNCTION = "EM_GETTHUMB"
CASE %EM_LINELENGTH : FUNCTION = "EM_LINELENGTH"
CASE %EM_REPLACESEL : FUNCTION = "EM_REPLACESEL"
CASE %EM_GETLINE : FUNCTION = "EM_GETLINE "
CASE %EM_LIMITTEXT : FUNCTION = "EM_LIMITTEXT "
CASE %EM_CANUNDO : FUNCTION = "EM_CANUNDO "
CASE %EM_UNDO : FUNCTION = "EM_UNDO"
CASE %EM_FMTLINES : FUNCTION = "EM_FMTLINES"
CASE %EM_LINEFROMCHAR : FUNCTION = "EM_LINEFROMCHAR"
CASE %EM_SETTABSTOPS : FUNCTION = "EM_SETTABSTOPS "
CASE %EM_SETPASSWORDCHAR : FUNCTION = "EM_SETPASSWORDCHAR "
CASE %EM_EMPTYUNDOBUFFER : FUNCTION = "EM_EMPTYUNDOBUFFER "
CASE %EM_GETFIRSTVISIBLELINE: FUNCTION = "EM_GETFIRSTVISIBLELINE "
CASE %EM_SETREADONLY : FUNCTION = "EM_SETREADONLY "
CASE %EM_SETWORDBREAKPROC : FUNCTION = "EM_SETWORDBREAKPROC"
CASE %EM_GETWORDBREAKPROC : FUNCTION = "EM_GETWORDBREAKPROC"
CASE %EM_GETPASSWORDCHAR : FUNCTION = "EM_GETPASSWORDCHAR "
CASE %EM_SETMARGINS : FUNCTION = "EM_SETMARGINS"
CASE %EM_GETMARGINS : FUNCTION = "EM_GETMARGINS"
CASE %EM_GETLIMITTEXT : FUNCTION = "EM_GETLIMITTEXT"
CASE %EM_POSFROMCHAR : FUNCTION = "EM_POSFROMCHAR "
CASE %EM_CHARFROMPOS : FUNCTION = "EM_CHARFROMPOS "
CASE %EM_SETIMESTATUS : FUNCTION = "EM_SETIMESTATUS"
CASE %EM_GETIMESTATUS : FUNCTION = "EM_GETIMESTATUS"
' ListBox messages
CASE %LB_ADDSTRING : FUNCTION = "LB_ADDSTRING
CASE %LB_INSERTSTRING : FUNCTION = "LB_INSERTSTRING
CASE %LB_DELETESTRING : FUNCTION = "LB_DELETESTRING
CASE %LB_SELITEMRANGEEX : FUNCTION = "LB_SELITEMRANGEEX
CASE %LB_RESETCONTENT : FUNCTION = "LB_RESETCONTENT
CASE %LB_SETSEL : FUNCTION = "LB_SETSEL
CASE %LB_SETCURSEL : FUNCTION = "LB_SETCURSEL
CASE %LB_GETSEL : FUNCTION = "LB_GETSEL
CASE %LB_GETCURSEL : FUNCTION = "LB_GETCURSEL
CASE %LB_GETTEXT : FUNCTION = "LB_GETTEXT
CASE %LB_GETTEXTLEN : FUNCTION = "LB_GETTEXTLEN
CASE %LB_GETCOUNT : FUNCTION = "LB_GETCOUNT
CASE %LB_SELECTSTRING : FUNCTION = "LB_SELECTSTRING
CASE %LB_DIR : FUNCTION = "LB_DIR
CASE %LB_GETTOPINDEX : FUNCTION = "LB_GETTOPINDEX
CASE %LB_FINDSTRING : FUNCTION = "LB_FINDSTRING
CASE %LB_GETSELCOUNT : FUNCTION = "LB_GETSELCOUNT
CASE %LB_GETSELITEMS : FUNCTION = "LB_GETSELITEMS
CASE %LB_SETTABSTOPS : FUNCTION = "LB_SETTABSTOPS
CASE %LB_GETHORIZONTALEXTENT: FUNCTION = "LB_GETHORIZONTALEXTENT
CASE %LB_SETHORIZONTALEXTENT: FUNCTION = "LB_SETHORIZONTALEXTENT
CASE %LB_SETCOLUMNWIDTH : FUNCTION = "LB_SETCOLUMNWIDTH
CASE %LB_ADDFILE : FUNCTION = "LB_ADDFILE
CASE %LB_SETTOPINDEX : FUNCTION = "LB_SETTOPINDEX
CASE %LB_GETITEMRECT : FUNCTION = "LB_GETITEMRECT
CASE %LB_GETITEMDATA : FUNCTION = "LB_GETITEMDATA
CASE %LB_SETITEMDATA : FUNCTION = "LB_SETITEMDATA
CASE %LB_SELITEMRANGE : FUNCTION = "LB_SELITEMRANGE
CASE %LB_SETANCHORINDEX : FUNCTION = "LB_SETANCHORINDEX
CASE %LB_GETANCHORINDEX : FUNCTION = "LB_GETANCHORINDEX
CASE %LB_SETCARETINDEX : FUNCTION = "LB_SETCARETINDEX
CASE %LB_GETCARETINDEX : FUNCTION = "LB_GETCARETINDEX
CASE %LB_SETITEMHEIGHT : FUNCTION = "LB_SETITEMHEIGHT
CASE %LB_GETITEMHEIGHT : FUNCTION = "LB_GETITEMHEIGHT
CASE %LB_FINDSTRINGEXACT : FUNCTION = "LB_FINDSTRINGEXACT
CASE %LB_SETLOCALE : FUNCTION = "LB_SETLOCALE
CASE %LB_GETLOCALE : FUNCTION = "LB_GETLOCALE
CASE %LB_SETCOUNT : FUNCTION = "LB_SETCOUNT
CASE %LB_INITSTORAGE : FUNCTION = "LB_INITSTORAGE
CASE %LB_ITEMFROMPOINT : FUNCTION = "LB_ITEMFROMPOINT
CASE %LB_MULTIPLEADDSTRING : FUNCTION = "LB_MULTIPLEADDSTRING
CASE %LB_GETLISTBOXINFO : FUNCTION = "LB_GETLISTBOXINFO
' Combo box messages
' Combo Bo case m
CASE %CB_GETEDITSEL : FUNCTION = "CB_GETEDITSEL"
CASE %CB_LIMITTEXT : FUNCTION = "CB_LIMITTEXT"
CASE %CB_SETEDITSEL : FUNCTION = "CB_SETEDITSEL"
CASE %CB_ADDSTRING : FUNCTION = "CB_ADDSTRING"
CASE %CB_DELETESTRING : FUNCTION = "CB_DELETESTRING"
CASE %CB_DIR : FUNCTION = "CB_DIR "
CASE %CB_GETCOUNT : FUNCTION = "CB_GETCOUNT"
CASE %CB_GETCURSEL : FUNCTION = "CB_GETCURSEL"
CASE %CB_GETLBTEXT : FUNCTION = "CB_GETLBTEXT"
CASE %CB_GETLBTEXTLEN : FUNCTION = "CB_GETLBTEXTLEN"
CASE %CB_INSERTSTRING : FUNCTION = "CB_INSERTSTRING"
CASE %CB_RESETCONTENT : FUNCTION = "CB_RESETCONTENT"
CASE %CB_FINDSTRING : FUNCTION = "CB_FINDSTRING"
CASE %CB_SELECTSTRING : FUNCTION = "CB_SELECTSTRING"
CASE %CB_SETCURSEL : FUNCTION = "CB_SETCURSEL"
CASE %CB_SHOWDROPDOWN : FUNCTION = "CB_SHOWDROPDOWN"
CASE %CB_GETITEMDATA : FUNCTION = "CB_GETITEMDATA"
CASE %CB_SETITEMDATA : FUNCTION = "CB_SETITEMDATA"
CASE %CB_GETDROPPEDCONTROLRECT: FUNCTION = "CB_GETDROPPEDCONTROLRECT"
CASE %CB_SETITEMHEIGHT : FUNCTION = "CB_SETITEMHEIGHT"
CASE %CB_GETITEMHEIGHT : FUNCTION = "CB_GETITEMHEIGHT"
CASE %CB_SETEXTENDEDUI : FUNCTION = "CB_SETEXTENDEDUI"
CASE %CB_GETEXTENDEDUI : FUNCTION = "CB_GETEXTENDEDUI"
CASE %CB_GETDROPPEDSTATE : FUNCTION = "CB_GETDROPPEDSTATE"
CASE %CB_FINDSTRINGEXACT : FUNCTION = "CB_FINDSTRINGEXACT"
CASE %CB_SETLOCALE : FUNCTION = "CB_SETLOCALE"
CASE %CB_GETLOCALE : FUNCTION = "CB_GETLOCALE"
CASE %CB_GETTOPINDEX : FUNCTION = "CB_GETTOPINDEX"
CASE %CB_SETTOPINDEX : FUNCTION = "CB_SETTOPINDEX"
CASE %CB_GETHORIZONTALEXTENT : FUNCTION = "CB_GETHORIZONTALEXTENT"
CASE %CB_SETHORIZONTALEXTENT : FUNCTION = "CB_SETHORIZONTALEXTENT"
CASE %CB_GETDROPPEDWIDTH : FUNCTION = "CB_GETDROPPEDWIDTH"
CASE %CB_SETDROPPEDWIDTH : FUNCTION = "CB_SETDROPPEDWIDTH"
CASE %CB_INITSTORAGE : FUNCTION = "CB_INITSTORAGE"
CASE %CB_MULTIPLEADDSTRING : FUNCTION = "CB_MULTIPLEADDSTRING"
CASE %CB_GETCOMBOBOXINFO : FUNCTION = "CB_GETCOMBOBOXINFO"
'scrollbar
CASE %SBM_SETPOS : FUNCTION = "%SBM_SETPOS"
CASE %SBM_GETPOS : FUNCTION = "%SBM_GETPOS"
CASE %SBM_SETRANGE: FUNCTION = "%SBM_SETRANGE"
CASE %SBM_SETRANGEREDRAW : FUNCTION = "%SBM_SETRANGEREDRAW"
CASE %SBM_GETRANGE: FUNCTION = "%SBM_GETRANGE"
CASE %SBM_ENABLE_ARROWS : FUNCTION = "%SBM_ENABLE_ARROWS "
CASE %SBM_SETSCROLLINFO : FUNCTION = "%SBM_SETSCROLLINFO "
CASE %SBM_GETSCROLLINFO : FUNCTION = "%SBM_GETSCROLLINFO "
CASE %SBM_GETSCROLLBARINFO: FUNCTION = "%SBM_GETSCROLLBARINFO"
'DDE
CASE %WM_DDE_INITIATE : FUNCTION = "%WM_DDE_INITIATE "
CASE %WM_DDE_TERMINATE : FUNCTION = "%WM_DDE_TERMINATE"
CASE %WM_DDE_ADVISE : FUNCTION = "%WM_DDE_ADVISE "
CASE %WM_DDE_UNADVISE : FUNCTION = "%WM_DDE_UNADVISE "
CASE %WM_DDE_ACK : FUNCTION = "%WM_DDE_ACK"
CASE %WM_DDE_DATA : FUNCTION = "%WM_DDE_DATA "
CASE %WM_DDE_REQUEST : FUNCTION = "%WM_DDE_REQUEST"
CASE %WM_DDE_POKE : FUNCTION = "%WM_DDE_POKE "
CASE %WM_DDE_EXECUTE : FUNCTION = "%WM_DDE_EXECUTE"
CASE %WM_DDE_LAST : FUNCTION = "%WM_DDE_LAST "
' multimedia
CASE %MM_JOY1MOVE : FUNCTION = "%MM_JOY1MOVE "
CASE %MM_JOY2MOVE : FUNCTION = "%MM_JOY2MOVE "
CASE %MM_JOY1ZMOVE: FUNCTION = "%MM_JOY1ZMOVE"
CASE %MM_JOY2ZMOVE: FUNCTION = "%MM_JOY2ZMOVE"
CASE %MM_JOY1BUTTONDOWN : FUNCTION = "%MM_JOY1BUTTONDOWN "
CASE %MM_JOY2BUTTONDOWN : FUNCTION = "%MM_JOY2BUTTONDOWN "
CASE %MM_JOY1BUTTONUP : FUNCTION = "%MM_JOY1BUTTONUP "
CASE %MM_JOY2BUTTONUP : FUNCTION = "%MM_JOY2BUTTONUP "
CASE %MM_MCINOTIFY: FUNCTION = "%MM_MCINOTIFY"
CASE %MM_MCISYSTEM_STRING : FUNCTION = "%MM_MCISYSTEM_STRING "
CASE %MM_WOM_OPEN : FUNCTION = "%MM_WOM_OPEN "
CASE %MM_WOM_CLOSE: FUNCTION = "%MM_WOM_CLOSE"
CASE %MM_WOM_DONE : FUNCTION = "%MM_WOM_DONE "
CASE %MM_WIM_OPEN : FUNCTION = "%MM_WIM_OPEN "
CASE %MM_WIM_CLOSE: FUNCTION = "%MM_WIM_CLOSE"
CASE %MM_WIM_DATA : FUNCTION = "%MM_WIM_DATA "
CASE %MM_MIM_OPEN : FUNCTION = "%MM_MIM_OPEN "
CASE %MM_MIM_CLOSE: FUNCTION = "%MM_MIM_CLOSE"
CASE %MM_MIM_DATA : FUNCTION = "%MM_MIM_DATA "
CASE %MM_MIM_LONGDATA : FUNCTION = "%MM_MIM_LONGDATA "
CASE %MM_MIM_ERROR: FUNCTION = "%MM_MIM_ERROR"
CASE %MM_MIM_LONGERROR : FUNCTION = "%MM_MIM_LONGERROR"
CASE %MM_MOM_OPEN : FUNCTION = "%MM_MOM_OPEN "
CASE %MM_MOM_CLOSE: FUNCTION = "%MM_MOM_CLOSE"
CASE %MM_MOM_DONE : FUNCTION = "%MM_MOM_DONE "
' Driver messages
CASE %DRV_LOAD : FUNCTION = "%DRV_LOAD"
CASE %DRV_ENABLE : FUNCTION = "%DRV_ENABLE"
CASE %DRV_OPEN : FUNCTION = "%DRV_OPEN"
CASE %DRV_CLOSE : FUNCTION = "%DRV_CLOSE "
CASE %DRV_DISABLE : FUNCTION = "%DRV_DISABLE "
CASE %DRV_FREE : FUNCTION = "%DRV_FREE"
CASE %DRV_CONFIGURE : FUNCTION = "%DRV_CONFIGURE "
CASE %DRV_QUERYCONFIGURE : FUNCTION = "%DRV_QUERYCONFIGURE"
CASE %DRV_INSTALL : FUNCTION = "%DRV_INSTALL "
CASE %DRV_REMOVE : FUNCTION = "%DRV_REMOVE"
CASE %DRV_EXITSESSION : FUNCTION = "%DRV_EXITSESSION "
CASE %DRV_POWER : FUNCTION = "%DRV_POWER "
CASE %DRV_RESERVED: FUNCTION = "%DRV_RESERVED"
CASE %DRV_USER : FUNCTION = "%DRV_USER"
' wave
CASE %WOM_OPEN : FUNCTION = "%WOM_OPEN"
CASE %WOM_CLOSE : FUNCTION = "%WOM_CLOSE "
CASE %WOM_DONE : FUNCTION = "%WOM_DONE"
CASE %WIM_OPEN : FUNCTION = "%WIM_OPEN"
CASE %WIM_CLOSE : FUNCTION = "%WIM_CLOSE "
CASE %WIM_DATA : FUNCTION = "%WIM_DATA"
' midi
CASE %MIM_OPEN : FUNCTION = "%MIM_OPEN"
CASE %MIM_CLOSE : FUNCTION = "%MIM_CLOSE "
CASE %MIM_DATA : FUNCTION = "%MIM_DATA"
CASE %MIM_LONGDATA: FUNCTION = "%MIM_LONGDATA"
CASE %MIM_ERROR : FUNCTION = "%MIM_ERROR "
CASE %MIM_LONGERROR : FUNCTION = "%MIM_LONGERROR "
CASE %MOM_OPEN : FUNCTION = "%MOM_OPEN"
CASE %MOM_CLOSE : FUNCTION = "%MOM_CLOSE "
CASE %MOM_DONE : FUNCTION = "%MOM_DONE"
'MCI
CASE %MCI_OPEN : FUNCTION = "%MCI_OPEN"
CASE %MCI_CLOSE : FUNCTION = "%MCI_CLOSE "
CASE %MCI_ESCAPE : FUNCTION = "%MCI_ESCAPE"
CASE %MCI_PLAY : FUNCTION = "%MCI_PLAY"
CASE %MCI_SEEK : FUNCTION = "%MCI_SEEK"
CASE %MCI_STOP : FUNCTION = "%MCI_STOP"
CASE %MCI_PAUSE : FUNCTION = "%MCI_PAUSE "
CASE %MCI_INFO : FUNCTION = "%MCI_INFO"
CASE %MCI_GETDEVCAPS : FUNCTION = "%MCI_GETDEVCAPS"
CASE %MCI_SPIN : FUNCTION = "%MCI_SPIN"
CASE %MCI_SET : FUNCTION = "%MCI_SET "
CASE %MCI_STEP : FUNCTION = "%MCI_STEP"
CASE %MCI_RECORD : FUNCTION = "%MCI_RECORD"
CASE %MCI_SYSINFO : FUNCTION = "%MCI_SYSINFO "
CASE %MCI_BREAK : FUNCTION = "%MCI_BREAK "
CASE %MCI_SOUND : FUNCTION = "%MCI_SOUND "
CASE %MCI_SAVE : FUNCTION = "%MCI_SAVE"
CASE %MCI_STATUS : FUNCTION = "%MCI_STATUS"
CASE %MCI_CUE : FUNCTION = "%MCI_CUE "
CASE %MCI_REALIZE : FUNCTION = "%MCI_REALIZE "
CASE %MCI_WINDOW : FUNCTION = "%MCI_WINDOW"
CASE %MCI_PUT : FUNCTION = "%MCI_PUT "
CASE %MCI_WHERE : FUNCTION = "%MCI_WHERE "
CASE %MCI_FREEZE : FUNCTION = "%MCI_FREEZE"
CASE %MCI_UNFREEZE: FUNCTION = "%MCI_UNFREEZE"
CASE %MCI_LOAD : FUNCTION = "%MCI_LOAD"
CASE %MCI_CUT : FUNCTION = "%MCI_CUT "
CASE %MCI_COPY : FUNCTION = "%MCI_COPY"
CASE %MCI_PASTE : FUNCTION = "%MCI_PASTE "
CASE %MCI_UPDATE : FUNCTION = "%MCI_UPDATE"
CASE %MCI_RESUME : FUNCTION = "%MCI_RESUME"
CASE %MCI_DELETE : FUNCTION = "%MCI_DELETE"
' from browser
CASE %BFFM_INITIALIZED : FUNCTION = "%BFFM_INITIALIZED"
CASE %BFFM_SELCHANGED : FUNCTION = "%BFFM_SELCHANGED "
CASE %BFFM_VALIDATEFAILEDA: FUNCTION = "%BFFM_VALIDATEFAILEDA"
CASE %BFFM_VALIDATEFAILEDW: FUNCTION = "%BFFM_VALIDATEFAILEDW"
' messages to browser
CASE %BFFM_SETSTATUSTEXTA : FUNCTION = "%BFFM_SETSTATUSTEXTA "
CASE %BFFM_ENABLEOK : FUNCTION = "%BFFM_ENABLEOK "
CASE %BFFM_SETSELECTIONA : FUNCTION = "%BFFM_SETSELECTIONA"
CASE %BFFM_SETSELECTIONW : FUNCTION = "%BFFM_SETSELECTIONW"
CASE %BFFM_SETSTATUSTEXTW : FUNCTION = "%BFFM_SETSTATUSTEXTW "
CASE %BFFM_SETOKTEXT : FUNCTION = "%BFFM_SETOKTEXT"
CASE %BFFM_SETEXPANDED : FUNCTION = "%BFFM_SETEXPANDED"
CASE %LVM_ARRANGE : function = "LVM_ARRANGE"
CASE %LVM_CREATEDRAGIMAGE : function = "LVM_CREATEDRAGIMAGE"
CASE %LVM_DELETEALLITEMS : function = "LVM_DELETEALLITEMS"
CASE %LVM_DELETECOLUMN : function = "LVM_DELETECOLUMN"
CASE %LVM_DELETEITEM : function = "LVM_DELETEITEM"
CASE %LVM_EDITLABEL : function = "LVM_EDITLABEL"
CASE %LVM_ENSUREVISIBLE : function = "LVM_ENSUREVISIBLE"
CASE %LVM_FINDITEM : function = "LVM_FINDITEM"
CASE %LVM_GETBKCOLOR : function = "LVM_GETBKCOLOR"
CASE %LVM_GETCALLBACKMASK : function = "LVM_GETCALLBACKMASK"
CASE %LVM_GETCOLUMN : function = "LVM_GETCOLUMN"
CASE %LVM_GETCOLUMNWIDTH : function = "LVM_GETCOLUMNWIDTH"
CASE %LVM_GETCOUNTPERPAGE : function = "LVM_GETCOUNTPERPAGE"
CASE %LVM_GETEDITCONTROL : function = "LVM_GETEDITCONTROL"
CASE %LVM_GETIMAGELIST : function = "LVM_GETIMAGELIST"
CASE %LVM_GETISEARCHSTRING : function = "LVM_GETISEARCHSTRING"
CASE %LVM_GETITEM : function = "LVM_GETITEM"
CASE %LVM_GETITEMCOUNT : function = "LVM_GETITEMCOUNT"
CASE %LVM_GETITEMPOSITION : function = "LVM_GETITEMPOSITION"
CASE %LVM_GETITEMRECT : function = "LVM_GETITEMRECT"
CASE %LVM_GETITEMSPACING : function = "LVM_GETITEMSPACING"
CASE %LVM_GETITEMSTATE : function = "LVM_GETITEMSTATE"
CASE %LVM_GETITEMTEXT : function = "LVM_GETITEMTEXT"
CASE %LVM_GETNEXTITEM : function = "LVM_GETNEXTITEM"
CASE %LVM_GETORIGIN : function = "LVM_GETORIGIN"
CASE %LVM_GETSELECTEDCOUNT : function = "LVM_GETSELECTEDCOUNT"
CASE %LVM_GETSTRINGWIDTH : function = "LVM_GETSTRINGWIDTH"
CASE %LVM_GETTEXTBKCOLOR : function = "LVM_GETTEXTBKCOLOR"
CASE %LVM_GETTEXTCOLOR : function = "LVM_GETTEXTCOLOR"
CASE %LVM_GETTOPINDEX : function = "LVM_GETTOPINDEX"
CASE %LVM_GETVIEWRECT : function = "LVM_GETVIEWRECT"
CASE %LVM_HITTEST : function = "LVM_HITTEST"
CASE %LVM_INSERTCOLUMN : function = "LVM_INSERTCOLUMN"
CASE %LVM_INSERTITEM : function = "LVM_INSERTITEM"
CASE %LVM_REDRAWITEMS : function = "LVM_REDRAWITEMS"
CASE %LVM_SCROLL : function = "LVM_SCROLL"
CASE %LVM_SETBKCOLOR : function = "LVM_SETBKCOLOR"
CASE %LVM_SETCALLBACKMASK : function = "LVM_SETCALLBACKMASK"
CASE %LVM_SETCOLUMN : function = "LVM_SETCOLUMN"
CASE %LVM_SETCOLUMNWIDTH : function = "LVM_SETCOLUMNWIDTH"
CASE %LVM_SETIMAGELIST : function = "LVM_SETIMAGELIST"
CASE %LVM_SETITEM : function = "LVM_SETITEM"
CASE %LVM_SETITEMCOUNT : function = "LVM_SETITEMCOUNT"
CASE %LVM_SETITEMPOSITION : function = "LVM_SETITEMPOSITION"
CASE %LVM_SETITEMPOSITION32 : function = "LVM_SETITEMPOSITION32"
CASE %LVM_SETITEMSTATE : function = "LVM_SETITEMSTATE"
CASE %LVM_SETITEMTEXT : function = "LVM_SETITEMTEXT"
CASE %LVM_SETTEXTBKCOLOR : function = "LVM_SETTEXTBKCOLOR"
CASE %LVM_SETTEXTCOLOR : function = "LVM_SETTEXTCOLOR"
CASE %LVM_SORTITEMS : function = "LVM_SORTITEMS"
CASE %LVM_UPDATE : function = "LVM_UPDATE"
CASE ELSE:FUNCTION = "Unknown Msg: &H" + HEX$(iMsgNum)
END SELECT
END FUNCTION