Egor00f/kolibrios
1
0
Fork 0
forked from KolibriOS/kolibrios
Code Pull Requests Activity

editbox ctrl-a support

Browse Source 
git-svn-id: svn://kolibrios.org@7558 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
pathoswithin 2018-11-19 10:21:18 +00:00
parent 6adf85be15
commit a4f526b924
1 changed files with 49 additions and 39 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
programs/develop/libraries/box_lib/trunk/editbox.asm
View File

@ -157,6 +157,8 @@ edit_box_key:
je edit_box_key.ctrl_c je edit_box_key.ctrl_c
cmp ah,47 ; Ctrl + V cmp ah,47 ; Ctrl + V
je edit_box_key.ctrl_v je edit_box_key.ctrl_v
cmp ah,30 ; Ctrl + A
je edit_box_key.ctrl_a
@@: @@:
cmp ah,SCAN_LWIN_RELEASE cmp ah,SCAN_LWIN_RELEASE
jz edit_box.editbox_exit jz edit_box.editbox_exit
@ -587,6 +589,14 @@ edit_box_key.ctrl_v:
.exit: .exit:
jmp edit_box.draw_bg_cursor_text jmp edit_box.draw_bg_cursor_text
edit_box_key.ctrl_a:
mov eax,ed_size
mov ed_pos,eax
xor eax,eax
mov ed_shift_pos,eax
or word ed_flags,ed_shift_bac+ed_shift_on
jmp edit_box.draw_bg_cursor_text
;========================================================== ;==========================================================
;=== ®¡à ¡®âª  ¬ëè¨ ======================================= ;=== ®¡à ¡®âª  ¬ëè¨ =======================================
;========================================================== ;==========================================================