Subversion Repositories Kolibri OS

Rev

Rev 1034 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1034 Rev 1113
Line 546... Line 546...
546 
        call    edit_box_key.sh_cl_  ;®ç¨á⪠ ¢ë¤¥«¥­®£® äà £¬¥­â 
 546 
        call    edit_box_key.sh_cl_  ;®ç¨á⪠ ¢ë¤¥«¥­®£® äà £¬¥­â 
547 
        and     word ed_flags,ed_shift_cl ; ®ç¨á⪠ ®â ⮣® çâ® ã¡à «¨ ¢ë¤¥«¥­¨¥
547 
        and     word ed_flags,ed_shift_cl ; ®ç¨á⪠ ®â ⮣® çâ® ã¡à «¨ ¢ë¤¥«¥­¨¥
548 
        jmp     edit_box.draw_cursor_text
 548 
        jmp     edit_box.draw_cursor_text
549 
@@:
 549 
@@:
550 
        and     word ed_flags,ed_shift_off
 550 
        and     word ed_flags,ed_shift_off
551 
edit_ex
 551 
        popad
- 
 
 552 
        ret     4
552 
;¯à®¢¥àª  á®áâ®ï­¨ï shift ¡ë« «¨ ®­ ­ ¦ â à ­ìè¥?
 553 
;¯à®¢¥àª  á®áâ®ï­¨ï shift ¡ë« «¨ ®­ ­ ¦ â à ­ìè¥?
553 
edit_box_key.sh_enable:
 554 
edit_box_key.sh_enable:
554 
        test    word ed_flags,ed_shift
 555 
        test    word ed_flags,ed_shift
555 
        jne     edit_box_key.sh_ext_en ;­ à¨á®¢ âì § ªà è¥­ë© ¯àאַ㣮«ì­¨ª
 556 
        jne     edit_box_key.sh_ext_en ;­ à¨á®¢ âì § ªà è¥­ë© ¯àאַ㣮«ì­¨ª
Line 959... Line 960...
959 
        mov     ecx,ed_pos
 960 
        mov     ecx,ed_pos
960 
        cmp     edx,ecx
 961 
        cmp     edx,ecx
961 
        jg      edit_box_key.bac_del
 962 
        jg      edit_box_key.bac_del
962 
        test    word ed_flags,ed_shift_on
 963 
        test    word ed_flags,ed_shift_on
963 
        jne     edit_box_key.del_bac
 964 
        jne     edit_box_key.del_bac
964 
edit_ex
 965 
        popad
- 
 
 966 
        ret     4
965 
edit_box_key.bac_del:
967 
edit_box_key.bac_del:
966 
        call    edit_box_key.del_char
 968 
        call    edit_box_key.del_char
967 
        jmp     edit_box_key.draw_all
 969 
        jmp     edit_box_key.draw_all
968 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;
970 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;
969 
;--- ­ ¦ â  ª« ¢¨è  backspace ---
 971 
;--- ­ ¦ â  ª« ¢¨è  backspace ---
Line 972... Line 974...
972 
        mov     ecx,ed_pos
 974 
        mov     ecx,ed_pos
973 
        test    ecx,ecx
 975 
        test    ecx,ecx
974 
        jnz     edit_box_key.del_bac
 976 
        jnz     edit_box_key.del_bac
975 
        test    word ed_flags,ed_shift_on
 977 
        test    word ed_flags,ed_shift_on
976 
        jne     edit_box_key.bac_del
 978 
        jne     edit_box_key.bac_del
- 
 
 979 
        popad
- 
 
 980 
        ret     4
Line 977... Line -...
977 
 
 - 
 
978 
edit_ex
 981 
 
979 
edit_box_key.del_bac:
 982 
edit_box_key.del_bac:
980 
        mov     edx,ed_size
 983 
        mov     edx,ed_size
981 
        cmp     edx,ecx ;if ed_pos=ed_size
 984 
        cmp     edx,ecx ;if ed_pos=ed_size
982 
        je      @f
 985 
        je      @f