* contrib/hbct/dattime2.c
% minor optimization
* src/rdd/dbsql.c
; added somment with syntax info
* include/inkey.ch
* src/rtl/hbgtcore.c
+ added support for mouse wheel left and right events to base GT code
372 lines
16 KiB
Plaintext
372 lines
16 KiB
Plaintext
/*
|
|
* Header file for Inkey() function
|
|
*
|
|
* Copyright 1999 {list of individual authors and e-mail addresses}
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License as published by
|
|
* the Free Software Foundation; either version 2, or (at your option)
|
|
* any later version.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program; see the file LICENSE.txt. If not, write to
|
|
* the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
|
|
* Boston, MA 02110-1301 USA (or visit https://www.gnu.org/licenses/).
|
|
*
|
|
* As a special exception, the Harbour Project gives permission for
|
|
* additional uses of the text contained in its release of Harbour.
|
|
*
|
|
* The exception is that, if you link the Harbour libraries with other
|
|
* files to produce an executable, this does not by itself cause the
|
|
* resulting executable to be covered by the GNU General Public License.
|
|
* Your use of that executable is in no way restricted on account of
|
|
* linking the Harbour library code into it.
|
|
*
|
|
* This exception does not however invalidate any other reasons why
|
|
* the executable file might be covered by the GNU General Public License.
|
|
*
|
|
* This exception applies only to the code released by the Harbour
|
|
* Project under the name Harbour. If you copy code from other
|
|
* Harbour Project or Free Software Foundation releases into a copy of
|
|
* Harbour, as the General Public License permits, the exception does
|
|
* not apply to the code that you add in this way. To avoid misleading
|
|
* anyone as to the status of such modified files, you must delete
|
|
* this exception notice from them.
|
|
*
|
|
* If you write modifications of your own for Harbour, it is your choice
|
|
* whether to permit this exception to apply to your modifications.
|
|
* If you do not wish that, delete this exception notice.
|
|
*
|
|
*/
|
|
|
|
/* NOTE: This file is also used by C code. */
|
|
|
|
/* NOTE: Keystroke descriptions marked with an asterisk (*) are only */
|
|
/* available on enhanced keyboards (those with more than 84 keys) */
|
|
|
|
#ifndef HB_INKEY_CH_
|
|
#define HB_INKEY_CH_
|
|
|
|
/* Input event masks */
|
|
|
|
#define INKEY_MOVE 1
|
|
#define INKEY_LDOWN 2
|
|
#define INKEY_LUP 4
|
|
#define INKEY_RDOWN 8
|
|
#define INKEY_RUP 16
|
|
#define INKEY_MMIDDLE 32 /* Harbour extension middle button mask */
|
|
#define INKEY_MWHEEL 64 /* Harbour extension mouse wheel mask */
|
|
#define INKEY_KEYBOARD 128
|
|
#define INKEY_ALL ( INKEY_KEYBOARD + INKEY_MOVE + INKEY_LDOWN + INKEY_LUP + INKEY_RDOWN + INKEY_RUP + INKEY_MMIDDLE + INKEY_MWHEEL )
|
|
|
|
#define HB_INKEY_RAW 256 /* Harbour extension */
|
|
#define HB_INKEY_GTEVENT 1024 /* Harbour extension */
|
|
#define HB_INKEY_EXT 2048 /* Harbour extension */
|
|
|
|
#define HB_INKEY_ALL ( INKEY_ALL + HB_INKEY_GTEVENT )
|
|
|
|
/* Mouse events */
|
|
|
|
#define K_MOUSEMOVE 1001
|
|
#define K_LBUTTONDOWN 1002
|
|
#define K_LBUTTONUP 1003
|
|
#define K_RBUTTONDOWN 1004
|
|
#define K_RBUTTONUP 1005
|
|
#define K_LDBLCLK 1006
|
|
#define K_RDBLCLK 1007
|
|
#define K_MBUTTONDOWN 1008 /* Middle Button Down */
|
|
#define K_MBUTTONUP 1009 /* Middle Button Up */
|
|
#define K_MDBLCLK 1010 /* Middle Button Double Click */
|
|
#define K_MMLEFTDOWN 1011 /* Mouse Move Left Down (COMPATIBILITY with removed Cl*pper incompatible Harbour extension, isn't used anymore) */
|
|
#define K_MMRIGHTDOWN 1012 /* Mouse Move Right Down (COMPATIBILITY with removed Cl*pper incompatible Harbour extension, isn't used anymore) */
|
|
#define K_MMMIDDLEDOWN 1013 /* Mouse Move Middle Down (COMPATIBILITY with removed Cl*pper incompatible Harbour extension, isn't used anymore) */
|
|
#define K_MWFORWARD 1014 /* Mouse Wheel Forward */
|
|
#define K_MWBACKWARD 1015 /* Mouse Wheel Backward */
|
|
#define K_NCMOUSEMOVE 1016 /* Non-Client Area Mouse Movement */
|
|
#define K_MWLEFT 1017 /* Mouse Wheel Left */
|
|
#define K_MWRIGHT 1018 /* Mouse Wheel Right */
|
|
|
|
#define K_MINMOUSE 1001
|
|
#define K_MAXMOUSE 1016
|
|
|
|
#define HB_K_RESIZE 1101
|
|
#define HB_K_CLOSE 1102
|
|
#define HB_K_GOTFOCUS 1103
|
|
#define HB_K_LOSTFOCUS 1104
|
|
#define HB_K_CONNECT 1105
|
|
#define HB_K_DISCONNECT 1106
|
|
#define HB_K_TERMINATE 1107
|
|
#define HB_K_MENU 1108
|
|
|
|
/* Cursor movement keys */
|
|
|
|
#define K_UP 5 /* Up arrow, Ctrl-E */
|
|
#define K_DOWN 24 /* Down arrow, Ctrl-X */
|
|
#define K_LEFT 19 /* Left arrow, Ctrl-S */
|
|
#define K_RIGHT 4 /* Right arrow, Ctrl-D */
|
|
#define K_HOME 1 /* Home, Ctrl-A */
|
|
#define K_END 6 /* End, Ctrl-F */
|
|
#define K_PGUP 18 /* PgUp, Ctrl-R */
|
|
#define K_PGDN 3 /* PgDn, Ctrl-C */
|
|
|
|
#define K_CTRL_UP 397 /* * Ctrl-Up arrow */
|
|
#define K_CTRL_DOWN 401 /* * Ctrl-Down arrow */
|
|
#define K_CTRL_LEFT 26 /* Ctrl-Left arrow, Ctrl-Z */
|
|
#define K_CTRL_RIGHT 2 /* Ctrl-Right arrow, Ctrl-B */
|
|
#define K_CTRL_HOME 29 /* Ctrl-Home, Ctrl-] */
|
|
#define K_CTRL_END 23 /* Ctrl-End, Ctrl-W */
|
|
#define K_CTRL_PGUP 31 /* Ctrl-PgUp, Ctrl-Hyphen */
|
|
#define K_CTRL_PGDN 30 /* Ctrl-PgDn, Ctrl-^ */
|
|
|
|
#define K_ALT_UP 408 /* * Alt-Up arrow */
|
|
#define K_ALT_DOWN 416 /* * Alt-Down arrow */
|
|
#define K_ALT_LEFT 411 /* * Alt-Left arrow */
|
|
#define K_ALT_RIGHT 413 /* * Alt-Right arrow */
|
|
#define K_ALT_HOME 407 /* * Alt-Home */
|
|
#define K_ALT_END 415 /* * Alt-End */
|
|
#define K_ALT_PGUP 409 /* * Alt-PgUp */
|
|
#define K_ALT_PGDN 417 /* * Alt-PgDn */
|
|
|
|
/* Misc. keys */
|
|
|
|
#define K_ENTER 13 /* Enter, Ctrl-M */
|
|
#define K_INTRO 13 /* */
|
|
#define K_RETURN 13 /* Return, Ctrl-M */
|
|
#define K_SPACE 32 /* Space bar */
|
|
#define K_ESC 27 /* Esc, Ctrl-[ */
|
|
|
|
#define K_CTRL_ENTER 10 /* Ctrl-Enter */
|
|
#define K_CTRL_RETURN 10 /* Ctrl-Return */
|
|
#define K_CTRL_RET 10 /* Ctrl-Return (Compatibility) */
|
|
#define K_CTRL_PRTSCR 379 /* * Ctrl-Print Screen */
|
|
#define K_CTRL_QUESTION 309 /* Ctrl-? */
|
|
|
|
#define K_ALT_ENTER 284 /* * Alt-Enter */
|
|
#define K_ALT_RETURN 284 /* * Alt-Return */
|
|
#define K_ALT_ESC 257 /* * Alt-Esc */
|
|
|
|
/* Keypad keys */
|
|
|
|
#define KP_CENTER 332 /* * Keypad 5 */
|
|
|
|
#define KP_ALT_ENTER 422 /* * Keypad Alt-Enter */
|
|
|
|
#define KP_CTRL_5 399 /* * Keypad Ctrl-5 */
|
|
#define KP_CTRL_SLASH 405 /* * Keypad Ctrl-/ */
|
|
#define KP_CTRL_ASTERISK 406 /* * Keypad Ctrl-* */
|
|
#define KP_CTRL_MINUS 398 /* * Keypad Ctrl-- */
|
|
#define KP_CTRL_PLUS 400 /* * Keypad Ctrl-+ */
|
|
|
|
#define KP_ALT_5 5 /* * Keypad Alt-5 */
|
|
#define KP_ALT_SLASH 420 /* * Keypad Alt-/ */
|
|
#define KP_ALT_ASTERISK 311 /* * Keypad Alt-* */
|
|
#define KP_ALT_MINUS 330 /* * Keypad Alt-- */
|
|
#define KP_ALT_PLUS 334 /* * Keypad Alt-+ */
|
|
|
|
/* Editing keys */
|
|
|
|
#define K_INS 22 /* Ins, Ctrl-V */
|
|
#define K_DEL 7 /* Del, Ctrl-G */
|
|
#define K_BS 8 /* Backspace, Ctrl-H */
|
|
#define K_TAB 9 /* Tab, Ctrl-I */
|
|
#define K_SH_TAB 271 /* Shift-Tab */
|
|
|
|
#define K_CTRL_INS 402 /* * Ctrl-Ins */
|
|
#define K_CTRL_DEL 403 /* * Ctrl-Del */
|
|
#define K_CTRL_BS 127 /* Ctrl-Backspace */
|
|
#define K_CTRL_TAB 404 /* * Ctrl-Tab */
|
|
|
|
#define K_ALT_INS 418 /* * Alt-Ins */
|
|
#define K_ALT_DEL 419 /* * Alt-Del */
|
|
#define K_ALT_BS 270 /* * Alt-Backspace */
|
|
#define K_ALT_TAB 421 /* * Alt-Tab */
|
|
|
|
#define K_CTRL_SH_TAB 423 /* * Ctrl-Shift-Tab */
|
|
#define K_SH_BS 423 /* * Shift-Backspace */
|
|
|
|
/* Control keys */
|
|
|
|
#define K_CTRL_A 1 /* Ctrl-A, Home */
|
|
#define K_CTRL_B 2 /* Ctrl-B, Ctrl-Right arrow */
|
|
#define K_CTRL_C 3 /* Ctrl-C, PgDn, Ctrl-ScrollLock */
|
|
#define K_CTRL_D 4 /* Ctrl-D, Right arrow */
|
|
#define K_CTRL_E 5 /* Ctrl-E, Up arrow */
|
|
#define K_CTRL_F 6 /* Ctrl-F, End */
|
|
#define K_CTRL_G 7 /* Ctrl-G, Del */
|
|
#define K_CTRL_H 8 /* Ctrl-H, Backspace */
|
|
#define K_CTRL_I 9 /* Ctrl-I, Tab */
|
|
#define K_CTRL_J 10 /* Ctrl-J */
|
|
#define K_CTRL_K 11 /* Ctrl-K */
|
|
#define K_CTRL_L 12 /* Ctrl-L */
|
|
#define K_CTRL_M 13 /* Ctrl-M, Return */
|
|
#define K_CTRL_N 14 /* Ctrl-N */
|
|
#define K_CTRL_O 15 /* Ctrl-O */
|
|
#define K_CTRL_P 16 /* Ctrl-P */
|
|
#define K_CTRL_Q 17 /* Ctrl-Q */
|
|
#define K_CTRL_R 18 /* Ctrl-R, PgUp */
|
|
#define K_CTRL_S 19 /* Ctrl-S, Left arrow */
|
|
#define K_CTRL_T 20 /* Ctrl-T */
|
|
#define K_CTRL_U 21 /* Ctrl-U */
|
|
#define K_CTRL_V 22 /* Ctrl-V, Ins */
|
|
#define K_CTRL_W 23 /* Ctrl-W, Ctrl-End */
|
|
#define K_CTRL_X 24 /* Ctrl-X, Down arrow */
|
|
#define K_CTRL_Y 25 /* Ctrl-Y */
|
|
#define K_CTRL_Z 26 /* Ctrl-Z, Ctrl-Left arrow */
|
|
|
|
/* Alt keys */
|
|
|
|
#define K_ALT_A 286 /* Alt-A */
|
|
#define K_ALT_B 304 /* Alt-B */
|
|
#define K_ALT_C 302 /* Alt-C */
|
|
#define K_ALT_D 288 /* Alt-D */
|
|
#define K_ALT_E 274 /* Alt-E */
|
|
#define K_ALT_F 289 /* Alt-F */
|
|
#define K_ALT_G 290 /* Alt-G */
|
|
#define K_ALT_H 291 /* Alt-H */
|
|
#define K_ALT_I 279 /* Alt-I */
|
|
#define K_ALT_J 292 /* Alt-J */
|
|
#define K_ALT_K 293 /* Alt-K */
|
|
#define K_ALT_L 294 /* Alt-L */
|
|
#define K_ALT_M 306 /* Alt-M */
|
|
#define K_ALT_N 305 /* Alt-N */
|
|
#define K_ALT_O 280 /* Alt-O */
|
|
#define K_ALT_P 281 /* Alt-P */
|
|
#define K_ALT_Q 272 /* Alt-Q */
|
|
#define K_ALT_R 275 /* Alt-R */
|
|
#define K_ALT_S 287 /* Alt-S */
|
|
#define K_ALT_T 276 /* Alt-T */
|
|
#define K_ALT_U 278 /* Alt-U */
|
|
#define K_ALT_V 303 /* Alt-V */
|
|
#define K_ALT_W 273 /* Alt-W */
|
|
#define K_ALT_X 301 /* Alt-X */
|
|
#define K_ALT_Y 277 /* Alt-Y */
|
|
#define K_ALT_Z 300 /* Alt-Z */
|
|
#define K_ALT_BACKQUOTE 297 /* Alt-` */
|
|
#define K_ALT_1 376 /* Alt-1 */
|
|
#define K_ALT_2 377 /* Alt-2 */
|
|
#define K_ALT_3 378 /* Alt-3 */
|
|
#define K_ALT_4 379 /* Alt-4 */
|
|
#define K_ALT_5 380 /* Alt-5 */
|
|
#define K_ALT_6 381 /* Alt-6 */
|
|
#define K_ALT_7 382 /* Alt-7 */
|
|
#define K_ALT_8 383 /* Alt-8 */
|
|
#define K_ALT_9 384 /* Alt-9 */
|
|
#define K_ALT_0 385 /* Alt-0 */
|
|
#define K_ALT_MINUS 386
|
|
#define K_ALT_EQUALS 387 /* * Alt-Equals */
|
|
#define K_ALT_OSB 282
|
|
#define K_ALT_CSB 283
|
|
#define K_ALT_BACKSLASH 299
|
|
#define K_ALT_SC 295
|
|
#define K_ALT_QUOTE 296
|
|
#define K_ALT_COMMA 307
|
|
#define K_ALT_PERIOD 308
|
|
#define K_ALT_SLASH 309 /* Alt-Slash (FYI: Ctrl-? doesn't work - maybe just under Windows XP?) */
|
|
|
|
/* Function keys */
|
|
|
|
#define K_F1 28 /* F1, Ctrl-Backslash */
|
|
#define K_F2 -1 /* F2 */
|
|
#define K_F3 -2 /* F3 */
|
|
#define K_F4 -3 /* F4 */
|
|
#define K_F5 -4 /* F5 */
|
|
#define K_F6 -5 /* F6 */
|
|
#define K_F7 -6 /* F7 */
|
|
#define K_F8 -7 /* F8 */
|
|
#define K_F9 -8 /* F9 */
|
|
#define K_F10 -9 /* F10 */
|
|
#define K_F11 -40 /* * F11 */
|
|
#define K_F12 -41 /* * F12 */
|
|
|
|
/* Control-function keys */
|
|
|
|
#define K_CTRL_F1 -20 /* Ctrl-F1 */
|
|
#define K_CTRL_F2 -21 /* Ctrl-F2 */
|
|
#define K_CTRL_F3 -22 /* Ctrl-F4 */
|
|
#define K_CTRL_F4 -23 /* Ctrl-F3 */
|
|
#define K_CTRL_F5 -24 /* Ctrl-F5 */
|
|
#define K_CTRL_F6 -25 /* Ctrl-F6 */
|
|
#define K_CTRL_F7 -26 /* Ctrl-F7 */
|
|
#define K_CTRL_F8 -27 /* Ctrl-F8 */
|
|
#define K_CTRL_F9 -28 /* Ctrl-F9 */
|
|
#define K_CTRL_F10 -29 /* Ctrl-F10 */
|
|
#define K_CTRL_F11 -44 /* * Ctrl-F11 */
|
|
#define K_CTRL_F12 -45 /* * Ctrl-F12 */
|
|
|
|
/* Alt-function keys */
|
|
|
|
#define K_ALT_F1 -30 /* Alt-F1 */
|
|
#define K_ALT_F2 -31 /* Alt-F2 */
|
|
#define K_ALT_F3 -32 /* Alt-F3 */
|
|
#define K_ALT_F4 -33 /* Alt-F4 */
|
|
#define K_ALT_F5 -34 /* Alt-F5 */
|
|
#define K_ALT_F6 -35 /* Alt-F6 */
|
|
#define K_ALT_F7 -36 /* Alt-F7 */
|
|
#define K_ALT_F8 -37 /* Alt-F8 */
|
|
#define K_ALT_F9 -38 /* Alt-F9 */
|
|
#define K_ALT_F10 -39 /* Alt-F10 */
|
|
#define K_ALT_F11 -46 /* * Alt-F11 */
|
|
#define K_ALT_F12 -47 /* * Alt-F12 */
|
|
|
|
/* Shift-function keys */
|
|
|
|
#define K_SH_F1 -10 /* Shift-F1 */
|
|
#define K_SH_F2 -11 /* Shift-F2 */
|
|
#define K_SH_F3 -12 /* Shift-F3 */
|
|
#define K_SH_F4 -13 /* Shift-F4 */
|
|
#define K_SH_F5 -14 /* Shift-F5 */
|
|
#define K_SH_F6 -15 /* Shift-F6 */
|
|
#define K_SH_F7 -16 /* Shift-F7 */
|
|
#define K_SH_F8 -17 /* Shift-F8 */
|
|
#define K_SH_F9 -18 /* Shift-F9 */
|
|
#define K_SH_F10 -19 /* Shift-F10 */
|
|
#define K_SH_F11 -42 /* * Shift-F11 */
|
|
#define K_SH_F12 -43 /* * Shift-F12 */
|
|
|
|
|
|
/* key flags used by extended key codes */
|
|
|
|
#define HB_KF_SHIFT 0x01
|
|
#define HB_KF_CTRL 0x02
|
|
#define HB_KF_ALT 0x04
|
|
#define HB_KF_KEYPAD 0x08
|
|
|
|
/* extended key codes */
|
|
|
|
#define HB_KX_F1 1
|
|
#define HB_KX_F2 2
|
|
#define HB_KX_F3 3
|
|
#define HB_KX_F4 4
|
|
#define HB_KX_F5 5
|
|
#define HB_KX_F6 6
|
|
#define HB_KX_F7 7
|
|
#define HB_KX_F8 8
|
|
#define HB_KX_F9 9
|
|
#define HB_KX_F10 10
|
|
#define HB_KX_F11 11
|
|
#define HB_KX_F12 12
|
|
#define HB_KX_UP 13
|
|
#define HB_KX_DOWN 14
|
|
#define HB_KX_LEFT 15
|
|
#define HB_KX_RIGHT 16
|
|
#define HB_KX_HOME 17
|
|
#define HB_KX_END 18
|
|
#define HB_KX_PGUP 19
|
|
#define HB_KX_PGDN 20
|
|
#define HB_KX_INS 21
|
|
#define HB_KX_DEL 22
|
|
#define HB_KX_BS 23
|
|
#define HB_KX_TAB 24
|
|
#define HB_KX_ESC 25
|
|
#define HB_KX_ENTER 26
|
|
#define HB_KX_CENTER 27
|
|
#define HB_KX_PRTSCR 28
|
|
#define HB_KX_PAUSE 29
|
|
|
|
#endif /* HB_INKEY_CH_ */
|