Subversion Repositories Kolibri OS

Rev

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

Rev 1373 Rev 1432
Line 3... Line 3...
3
;Checkbox
3
;Checkbox
Line 4... Line 4...
4
 
4
 
5
ch_struc_size=36
5
ch_struc_size=36
Line 6... Line 6...
6
ch_flag_en=10b ;ýëåìåíò âûáðàí
6
ch_flag_en=10b ;ýëåìåíò âûáðàí
7
 
7
 
8
ch_left  equ [edi]         ;ª®®à¤¨­ â  ­ ç «  à¨á®¢ ­¨ï ¯® å
8
ch_left  equ [edi]         ;êîîðäèíàòà íà÷àëà ðèñîâàíèÿ ïî õ
9
ch_top   equ [edi+2]       ;ª®®à¤¨­ â  ­ ç «  à¨á®¢ ­¨ï ¯® ã
9
ch_top   equ [edi+2]       ;êîîðäèíàòà íà÷àëà ðèñîâàíèÿ ïî ó
10
ch_text_margin equ [edi+4] ;=4 à ááâ®ï­¨¥ ®â ¯àאַ㣮«ì­¨ª  祪 ¡®ªá  ¤® ­ ¤¯¨á¨ 
10
ch_text_margin equ [edi+4] ;=4 ðàññòîÿíèå îò ïðÿìîóãîëüíèêà ÷åê áîêñà äî íàäïèñè 
11
ch_size  equ [edi+8]       ;12 à §¬¥à ª¢ ¤à â  祪 ¡®ªá  
11
ch_size  equ [edi+8]       ;12 ðàçìåð êâàäðàòà ÷åê áîêñà 
12
ch_color equ [edi+12]      ;梥⠢­ãâਠcheckbox
12
ch_color equ [edi+12]      ;öâåò âíóòðè checkbox
13
ch_border_color equ [edi+16] ; or [edi+4] ;梥â à ¬ª¨ checkbox ¥¥ ¬®¦­® § ¤ âì á ¬®áâ®ï⥫쭮
13
ch_border_color equ [edi+16] ; or [edi+4] ;öâåò ðàìêè checkbox åå ìîæíî çàäàòü ñàìîñòîÿòåëüíî
14
ch_text_color   equ [edi+20] ;[edi+4]  ;梥â ⥪áâ 
14
ch_text_color   equ [edi+20] ;[edi+4]  ;öâåò òåêñòà
15
ch_text_ptr     equ [edi+24] ;㪠§ â¥«ì ­  ­ ç «® ⥪á⮢®© áâப¨ 
15
ch_text_ptr     equ [edi+24] ;óêàçàòåëü íà íà÷àëî òåêñòîâîé ñòðîêè 
16
ch_text_length  equ [edi+28]
-
 
17
ch_flags equ [edi+32]      ;ä« £¨ 
-
 
18
 
-
 
19
macro check_boxes_set_sys_color start,end,color_table
-
 
20
{
-
 
21
    mov     edi,start
-
 
22
    mov     ecx,((end-start)/ch_struc_size)
-
 
23
    mov     esi,color_table
-
 
24
@@:
-
 
25
;    push    dword [esi+20] ;梥â à ¡®ç¥© ®¡« á⨠®ª­ 
-
 
26
;    pop     dword ch_color
-
 
27
    push    dword [esi+32] ;梥â ⥪áâ  ¢ à ¡®ç¥© ®¡« á⨠®ª­ 
-
 
28
    pop     dword ch_text_color
-
 
29
    push    dword [esi+36] ;梥⠣à ä¨ª¨ ¢ ®ª­¥ (à §¤¥«¨â¥«ì­ë¥ «¨­¨¨ ¨ â.¯.)
-
 
30
    pop     dword ch_border_color
-
 
31
    add     edi,ch_struc_size
-
 
32
    loop    @b
-
 
33
}
-
 
34
struc check_box left,top,ch_text_margin,ch_size,color,border_color,text_color,text,ch_text_length,flags
-
 
35
{        ;áâàãªâãà  ¯ à ¬¥â஢ ¤«ï 祪 ¡®ªá 
-
 
36
.left: dw left      ;+0 ¯®«®¦¥­¨¥ ¯® å
-
 
37
.top:  dw top       ;+2 ¯®«®¦¥­¨¥ ¯® ã
-
 
38
.ch_text_margin:  dd ch_text_margin ;à ááâ®ï­¨¥ ®â ¯àאַ㣮«ì­¨ª  祪 ¡®ªá  ¤® ­ ¤¯¨á¨
-
 
39
.ch_size: dd ch_size ;à §¬¥à ª¢ ¤à â  祪 ¡®ªá , ¤«ï ¯à¨¬¥à  12
-
 
40
.color:   dd color   ;梥⠢­ãâਠ祪¡®ªá 
-
 
41
.border_color: dd border_color ;梥â à ¬ª¨
-
 
42
.text_color:   dd text_color   ;梥⠭ ¤¯¨á¨
-
 
43
.text: dd text                 ; ¤à¥á ¢ ª®¤¥ ¯à®£à ¬¬ë £¤¥ à á¯®«®¦¥­ ⥪áâ
-
 
44
.ch_text_length: dd ch_text_length ;¤«¨­­  áâப¨ á ᨬ¢®« ¬¨
-
 
Line 45... Line 16...
45
.flags: dd flags+0   ; ä« £¨        
16
ch_text_length  equ [edi+28]
46
}
17
ch_flags equ [edi+32]      ;ôëàãè 
47
 
18
 
48
macro use_checkbox_draw
19
macro use_checkbox_draw