Subversion Repositories Kolibri OS

Rev

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

Rev 6675 Rev 6677
Line 226... Line 226...
226
        mov     eax,4
226
        mov     eax,4
227
        mov     ebx,ed_left
227
        mov     ebx,ed_left
228
        add     ebx,2
228
        add     ebx,2
229
        shl     ebx,16
229
        shl     ebx,16
230
        add     ebx,ed_top
230
        add     ebx,ed_top
231
        add     ebx,2
231
        add     ebx,3
232
        mov     ecx,ed_text_color
232
        mov     ecx,ed_text_color
233
        test    dword ed_flags,ed_pass
233
        test    dword ed_flags,ed_pass
234
        jnz     .password
234
        jnz     .password
235
        mov     edx,ed_text
235
        mov     edx,ed_text
236
        add     edx,ed_offset
236
        add     edx,ed_offset
Line 268... Line 268...
268
edit_box.draw_bg_eax:
268
edit_box.draw_bg_eax:
269
        mov     ecx,ed_top
269
        mov     ecx,ed_top
270
        inc     ecx
270
        inc     ecx
271
        shl     ecx,16
271
        shl     ecx,16
272
        add     ecx,ed_height
272
        add     ecx,ed_height
273
        dec     ecx
-
 
274
        mcall   13
273
        mcall   13
275
        ret
274
        ret
Line 276... Line 275...
276
 
275
 
277
;----------------------------------------------------------
276
;----------------------------------------------------------
Line 308... Line 307...
308
        add     ecx,2
307
        add     ecx,2
309
        mov     edx,ecx
308
        mov     edx,ecx
310
        shl     ecx,16
309
        shl     ecx,16
311
        add     ecx,edx
310
        add     ecx,edx
312
        add     ecx,ed_height
311
        add     ecx,ed_height
313
        sub     ecx,4
312
        sub     ecx,3
314
        mov     cl_curs_x,ebx
313
        mov     cl_curs_x,ebx
315
        mov     cl_curs_y,ecx
314
        mov     cl_curs_y,ecx
316
        mov     edx,ed_text_color
315
        mov     edx,ed_text_color
317
edit_box.draw_curs:
316
edit_box.draw_curs:
318
        mcall   38
317
        mcall   38
Line 320... Line 319...
320
 
319
 
321
;----------------------------------------------------------
320
;----------------------------------------------------------
322
;--- ¯à®æ¥¤ãà  à¨á®¢ ­¨ï à ¬ª¨ ----------------------------
321
;--- ¯à®æ¥¤ãà  à¨á®¢ ­¨ï à ¬ª¨ ----------------------------
323
;----------------------------------------------------------
322
;----------------------------------------------------------
324
edit_box.draw_border:
-
 
325
;--- 梥â à ¬ª¨ ---
323
edit_box.draw_border:
326
        test    word ed_flags,ed_focus
324
        test    word ed_flags,ed_focus
327
        mov     edx,ed_focus_border_color
325
        mov     edx,ed_focus_border_color
328
        jne     @f
326
        jne     @f
329
        mov     edx,ed_blur_border_color
327
        mov     edx,ed_blur_border_color
330
@@:
-
 
331
;--- ᢥàåã ---
-
 
332
        mov     eax,38
328
@@:
333
        mov     ebx,ed_left
329
        mov     ebx,ed_left
334
        mov     ecx,ebx
330
        mov     ecx,ebx
335
        shl     ebx,16
331
        shl     ebx,16
336
        mov     bx,cx
332
        add     ebx,ecx
337
        add     ebx,ed_width
333
        add     ebx,ed_width
338
        mov     ecx,ed_top
334
        mov     ecx,ed_top
339
        mov     esi,ecx
335
        mov     esi,ecx
340
        shl     ecx,16
336
        shl     ecx,16
341
        mov     cx,si
337
        add     ecx,esi
342
        mcall
-
 
343
;--- á­¨§ã ---
338
        mcall   38  ; top
-
 
339
        mov     esi,ecx
344
        mov     esi,ecx
340
        inc     ecx
345
        add     ecx,ed_height
341
        add     ecx,ed_height
346
        mov     ebp,ecx
342
        mov     ebp,ecx
347
        shl     ecx,16
343
        shl     ecx,16
348
        mov     cx,bp
344
        mov     cx,bp
349
        mcall
-
 
350
;--- á«¥¢  ---
345
        mcall   ; bottom
351
        mov     cx,si
346
        mov     cx,si
352
        mov     ebp,ebx
347
        mov     ebp,ebx
353
        sub     ebx,ed_width
348
        sub     ebx,ed_width
354
        mcall
-
 
355
;--- á¯à ¢  ---
349
        mcall   ; left
356
        mov     ebx,ebp
350
        mov     ebx,ebp
357
        shl     ebx,16
351
        shl     ebx,16
358
        mov     bx,bp
352
        mov     bx,bp
359
        mcall
353
        mcall   ; right
Line 360... Line 354...
360
        ret
354
        ret
361
 
355
 
362
;----------------------------------------------------------
356
;----------------------------------------------------------