Citación del post de
Recato53
|
❞
Es sobre un textBox control.
|
En el evento
KeyDown tienes el siguiente codigo generado:
Código COBOL:
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
LINKAGE SECTION.
01 POW-ARG-KEYCODE PIC S9(4) COMP-5.
01 POW-ARG-SHIFT PIC S9(4) COMP-5.
PROCEDURE DIVISION USING POW-ARG-KEYCODE POW-ARG-SHIFT.
El campo POW-ARG-KEYCODE te indica la tecla pulsada, el campo POW-ARG-SHIFT indica si estan pulsados SHIFT, CTRL y ALT:
Código:
2. KeyCode: The key code that was pressed. See Key Code Constants for details of key codes.
3. ShiftState: Bit mask settings indicate the state of each of the shift keys - Shift, Ctrl and ALT. Numbering the bits 1 to 8, from least significant to most significant, the bit mapping is:
1 - Shift key (POW-SHIFTSTATE-SHIFT)
2 - Ctrl key (POW-SHIFTSTATE-CTRL)
3 - Alt key (POW-SHIFTSTATE-ALT)
For example if the parameter has a value of 6 (binary 00000110), this indicates that the Ctl and Alt keys are depressed.