Subversion Repositories Kolibri OS

Rev

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

Rev 4601 Rev 5679
Line 44... Line 44...
44 
;==========================================================
 44 
;==========================================================
45 
edit_box_key:
 45 
edit_box_key:
46 
pushad
 46 
pushad
47 
        mov     edi,dword [esp+36]
 47 
        mov     edi,dword [esp+36]
48 
        test    word ed_flags,ed_focus ; ¥á«¨ ­¥ ¢ 䮪ãá¥, ¢ë室¨¬
 48 
        test    word ed_flags,ed_focus ; ¥á«¨ ­¥ ¢ 䮪ãá¥, ¢ë室¨¬
49 
        je      edit_box.editbox_exit
 49 
        jz      edit_box.editbox_exit
50 
        test    word ed_flags,ed_mouse_on
 50 
        test    word ed_flags,ed_mouse_on or ed_disabled
51 
        jne     edit_box.editbox_exit
 51 
        jnz     edit_box.editbox_exit
Line 52... Line 52...
52 
 
 52 
 
53 
;--------------------------------------
 53 
;--------------------------------------
54 
; this code for Win-keys, works with
 54 
; this code for Win-keys, works with
55 
; kernel SVN r.3356 or later
 55 
; kernel SVN r.3356 or later
Line 128... Line 128...
128 
;==========================================================
 128 
;==========================================================
129 
;save for stdcall ebx,esi,edi,ebp
 129 
;save for stdcall ebx,esi,edi,ebp
130 
edit_box_mouse:
 130 
edit_box_mouse:
131 
pushad
 131 
pushad
132 
        mov     edi,dword [esp+36]
 132 
        mov     edi,dword [esp+36]
- 
 
 133 
        test    word ed_flags,ed_disabled
- 
 
 134 
        jnz     edit_box.editbox_exit
133 
;debug
 135 
;debug
134 
;----------------------------------------------------------
 136 
;----------------------------------------------------------
135 
;--- ¯®«ãç ¥¬ á®áâ®ï­¨¥ ª­®¯®ª ¬ëè¨ -----------------------
 137 
;--- ¯®«ãç ¥¬ á®áâ®ï­¨¥ ª­®¯®ª ¬ëè¨ -----------------------
136 
;----------------------------------------------------------
 138 
;----------------------------------------------------------
137 
        mcall   37,2
 139 
        mcall   37,2
Line 263... Line 265...
263 
 
 265 
 
264 
edit_box.draw_bg:
 266 
edit_box.draw_bg:
265 
        mov     ebx,ed_left
 267 
        mov     ebx,ed_left
266 
        add     ebx,1
 268 
        add     ebx,1
- 
 
 269 
        mov     edx,ed_color
- 
 
 270 
        test    word ed_flags, ed_disabled
- 
 
 271 
        jz      @f
- 
 
 272 
        mov     edx, 0x00cacaca         ; TODO: add new value disabled_color to editbox struct
267 
        mov     edx,ed_color
 273 
  @@:
268 
        shl     ebx,16
 274 
        shl     ebx,16
269 
        add     ebx,ed_width
 275 
        add     ebx,ed_width
270 
        sub     ebx,1
 276 
        sub     ebx,1
271 
;¢å®¤ ⮫쪮 梥â edx
 277 
;¢å®¤ ⮫쪮 梥â edx