zgl_keyboard.pas

Rus: процедуры для общего пользования.
Eng: procedures for general use.

---

procedure keyboardDown(keyCode: LongWord);
Rus: внутренняя работа с клавиатурой для всех систем, не надо трогать эту процедуру.
Eng: internal work with the keyboard for all systems, do not touch this procedure.

procedure keyboardUp(keyCode: LongWord);
Rus: внутренняя работа с клавиатурой для всех систем, не надо трогать эту процедуру.
Eng: internal work with the keyboard for all systems, do not touch this procedure.

function key_Down(KeyCode: LongWord): Boolean;
Rus: опрос, удержана ли клавиша.
Eng: Polling if a key is held down.

function key_Up(KeyCode: LongWord): Boolean;
Rus: опрос, отжата клавиша или нет в данный момент времени.
Eng: polling whether a key is released or not at a given time.

function key_Press(KeyCode: LongWord): Boolean;
Rus: опрос, нажата клавиша или нет, в данный момент времени.
Eng: polling whether a key is pressed or not, at a given time.

function key_Last(KeyAction: LongWord): LongWord;
Rus: вернёт код последней нажатой/отжатой (НЕ УПРАВЛЯЮЩЕЙ!) клавиши KeyAction = или KADOWN или KAUP.
Eng: will return the code of the last pressed/released (NOT CONTROL!) key KeyAction = either KADOWN or KAUP.

---

Rus: старые способы использования поля ввода 3-я демка.
- Если в zgl_config.cfg включить определение KEYBOARD_OLD_FUNCTION то можно использовать функционал предложенный Andru из ZenGL 3.12.
Eng: old ways to use the input field 3rd demo.
- If you include the definition of KEYBOARD_OLD_FUNCTION in zgl_config.cfg, then you can use the functionality proposed by Andru from ZenGL 3.12.

procedure key_BeginReadText(const Text: UTF8String; MaxSymbols: Integer = -1);
Rus: начать работу с "полем ввода". Содержимое Text будет использоваться как начальное. MaxSymbols указывает ограничение на количество символов(-1 - нет ограничения).
Eng: start working with the "input field". The content of Text will be used as the initial content. MaxSymbols indicates the limit on the number of symbols (-1 - no limit).

procedure key_UpdateReadText(const Text: UTF8String; MaxSymbols: Integer = -1);
Rus: внесение изменений в "поле ввода". Обновляет текст и максимальное количество вводимых символов.
Eng: making changes to the input field. Updates the text and the maximum number of characters entered.

function key_GetText: UTF8String;
Rus: вернуть текст из "поля ввода".
Eng: return the text from the "input field".

procedure key_EndReadText;
Rus: закончить работу с "полем ввода".
Eng: finish working with the "input field".

function _key_GetText: PAnsiChar;
Rus: вернуть текст из "поля ввода" в формате PAnsiChar.
Eng: return text from the "input field" in PAnsiChar format.

---

Rus: константы.
Eng: constants.

K_SYSRQ
K_PAUSE
K_ESCAPE
K_ENTER

K_UP
K_DOWN
K_LEFT
K_RIGHT

K_BACKSPACE
K_SPACE
K_TAB
K_TILDE

K_INSERT
K_DELETE
K_HOME
K_END
K_PAGEUP
K_PAGEDOWN

K_CTRL
K_CTRL_L
K_CTRL_R
K_ALT
K_ALT_L
K_ALT_R
K_SHIFT
K_SHIFT_L
K_SHIFT_R
K_SUPER
K_SUPER_L
K_SUPER_R

K_APP_MENU
K_CAPSLOCK
K_NUMLOCK
K_SCROLL

K_BRACKET_L
K_BRACKET_R
K_BACKSLASH
K_SLASH
K_SEPARATOR
K_DECIMAL
K_SEMICOLON
K_APOSTROPHE

K_0
K_1
K_2
K_3
K_4
K_5
K_6
K_7
K_8
K_9
K_MINUS
K_EQUALS

K_A
K_B
K_C
K_D
K_E
K_F
K_G
K_H
K_I
K_J
K_K
K_L
K_M
K_N
K_O
K_P
K_Q
K_R
K_S
K_T
K_U
K_V
K_W
K_X
K_Y
K_Z

K_KP_0
K_KP_1
K_KP_2
K_KP_3
K_KP_4
K_KP_5
K_KP_6
K_KP_7
K_KP_8
K_KP_9
K_KP_SUB
K_KP_ADD
K_KP_MUL
K_KP_DIV
K_KP_DECIMAL
K_KP_ENTER

K_F1 - K_F12

Rus: нажата любая не управляющая клавиша.
Eng: any non-control key is pressed.
K_NOT_CONTROL

Rus: константы для возврата последней не управляющей клавиши.
Eng: constants to return the last non-control key.

KA_DOWN
KA_UP

Rus: события происходящие только при нажатии/отжатии клавиш.
Eng: events that occur only when keys are pressed/released.

KT_DOWN
KT_UP