Subversion Repositories Kolibri OS

Rev

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

Rev 583 Rev 645
Line 827... Line 827...
827
        shr     eax,16
827
        shr     eax,16
828
        or      word ed_flags,ed_shift_bac+ed_shift_on+ed_shift
828
        or      word ed_flags,ed_shift_bac+ed_shift_on+ed_shift
829
;;;;;;;;;;;;;;;;;;
829
;;;;;;;;;;;;;;;;;;
830
;;¯à®æ¥¤ãà  ®¡à ¡®âª¨ ¯®«®¦¥­¨ï ¢ë¤¥«¥­­®£® ⥪áâ , ª®£¤  ¯à®¨á室¨â ¢ë室 §  ¯à¥¤¥«ë editbox
830
;;¯à®æ¥¤ãà  ®¡à ¡®âª¨ ¯®«®¦¥­¨ï ¢ë¤¥«¥­­®£® ⥪áâ , ª®£¤  ¯à®¨á室¨â ¢ë室 §  ¯à¥¤¥«ë editbox
831
;;;;;;;;;;;;;;;;;;
831
;;;;;;;;;;;;;;;;;;
832
        mov     ebx,[procinfo.box.left]
832
        mov     ebx,dword [procinfo+34]
833
        add     ebx,ed_left
833
        add     ebx,ed_left
834
if scr_w eq 
834
if scr_w eq 
835
else
835
else
836
        add     ebx,dword scr_w
836
        add     ebx,dword scr_w
837
end if
837
end if
Line 927... Line 927...
927
        test    word ed_flags,ed_mouse_on
927
        test    word ed_flags,ed_mouse_on
928
        jne     .mouse_wigwag
928
        jne     .mouse_wigwag
929
;----------------------------------------------------------
929
;----------------------------------------------------------
930
;--- ¯à®¢¥à塞, ¯®¯ ¤ ¥â «¨ ªãàá®à ¢ edit box -------------
930
;--- ¯à®¢¥à塞, ¯®¯ ¤ ¥â «¨ ªãàá®à ¢ edit box -------------
931
;----------------------------------------------------------
931
;----------------------------------------------------------
932
        mov     ebx,[procinfo.box.top]
932
        mov     ebx,dword [procinfo + 38]
933
        add     ebx,ed_top
933
        add     ebx,ed_top
934
if scr_h eq 
934
if scr_h eq 
935
else
935
else
936
        add     ebx,scr_h
936
        add     ebx,scr_h
937
end if
937
end if
Line 942... Line 942...
942
        cmp     ax,bx
942
        cmp     ax,bx
943
        jg      ._blur;.mouse_end_no_focus
943
        jg      ._blur;.mouse_end_no_focus
Line 944... Line 944...
944
 
944
 
Line 945... Line 945...
945
        shr     eax,16
945
        shr     eax,16
946
 
946
 
947
        mov     ebx,[procinfo.box.left]
947
        mov     ebx,dword [procinfo + 34]
948
        add     ebx,ed_left
948
        add     ebx,ed_left
949
if scr_w eq 
949
if scr_w eq 
950
else
950
else
Line 960... Line 960...
960
        push    eax
960
        push    eax
961
        mov     ebp,ed_color
961
        mov     ebp,ed_color
962
        call    .clear_cursor
962
        call    .clear_cursor
963
        pop     eax
963
        pop     eax
964
._mvpos:
964
._mvpos:
965
        mov     ebx,dword [procinfo.box.left]
965
        mov     ebx,dword [procinfo+ 34]
966
        xor     edx,edx
966
        xor     edx,edx
967
        sub     eax,ed_left
967
        sub     eax,ed_left
968
        sub     eax,ebx
968
        sub     eax,ebx
969
if scr_w eq 
969
if scr_w eq 
970
else
970
else