diff --git a/programs/develop/kol_f_edit/box_l.ced b/programs/develop/kol_f_edit/box_l.ced index a37f47235b..21559b95fb 100644 Binary files a/programs/develop/kol_f_edit/box_l.ced and b/programs/develop/kol_f_edit/box_l.ced differ diff --git a/programs/develop/kol_f_edit/buf2d.ced b/programs/develop/kol_f_edit/buf2d.ced index 4b175e1c07..71a6e87dac 100644 Binary files a/programs/develop/kol_f_edit/buf2d.ced and b/programs/develop/kol_f_edit/buf2d.ced differ diff --git a/programs/develop/kol_f_edit/ced_code_g.inc b/programs/develop/kol_f_edit/ced_code_g.inc index 8c372a7b81..ef8f429f34 100644 --- a/programs/develop/kol_f_edit/ced_code_g.inc +++ b/programs/develop/kol_f_edit/ced_code_g.inc @@ -1092,7 +1092,7 @@ proc get_code_window, p_obj:dword insert_reg txt_eax insert_nl - ;mov ebx,... + ;mov ebx,... задается ширина окна и отступ от левого края экрана insert_tab stdcall insert_text, txt_mov insert_reg txt_ebx @@ -1100,7 +1100,7 @@ proc get_code_window, p_obj:dword stdcall insert_2_prop_16_bit, ebx,2,4 insert_nl - ;mov ecx,... + ;mov ecx,... задается высота окна и отступ от верхнего края экрана insert_tab stdcall insert_text, txt_mov insert_reg txt_ecx @@ -1108,7 +1108,7 @@ proc get_code_window, p_obj:dword stdcall insert_2_prop_16_bit, ebx,3,5 insert_nl - ;mov edx,... + ;mov edx,... задается цвет рабочей области окна insert_tab stdcall insert_text, txt_mov insert_reg txt_edx @@ -1121,7 +1121,14 @@ proc get_code_window, p_obj:dword stdcall insert_text, txt_or insert_reg txt_edx insert_coma - stdcall insert_text, txt_0x33000000 + stdcall insert_text,txt_skob_o + stdcall insert_text_prop, ebx,1 ;стиль окна + stdcall insert_text,txt_shl_24 + stdcall insert_text,txt_skob_c + stdcall insert_bit_prop, ebx,BIT_MOD_WI_CAPT + stdcall insert_bit_prop, ebx,BIT_MOD_WI_CORD_OTN_CL_OBL + stdcall insert_bit_prop, ebx,BIT_MOD_WI_REDR + stdcall insert_bit_prop, ebx,BIT_MOD_WI_GRAD insert_nl ;mov edi,... @@ -1414,7 +1421,6 @@ txt_ll_end db 'l_libs_end:',13,0 txt_bit_29 db '0x20000000',0 txt_bit_30 db '0x40000000',0 ;txt_bit_31 db '0x80000000',0 -txt_0x33000000 db '0x33000000',0 ;tmp txt_struc db 'struc',0 txt_t db 't',0 txt_met_end db '.end',0 @@ -1437,6 +1443,7 @@ txt_align_4 db 'align 4',13,0 txt_d_poi db ':',0 txt_ret db 'ret',13,0 txt_shl_16 db ' shl 16',0 +txt_shl_24 db ' shl 24',0 txt_std_mouse_ed: db 9,'stdcall [edit_box_mouse], ',0 txt_std_init_cb: diff --git a/programs/develop/kol_f_edit/ced_constr.inc b/programs/develop/kol_f_edit/ced_constr.inc index f869eda2df..007a87cf98 100644 --- a/programs/develop/kol_f_edit/ced_constr.inc +++ b/programs/develop/kol_f_edit/ced_constr.inc @@ -2,10 +2,20 @@ ; в этом файле собраны функции рисующие окно конструктора ; +;передвигаем координаты относительно скина macro move_to_skin coord_x,coord_y { - add coord_x,SKIN_W1 - add coord_y,SKIN_H + push eax + mov eax,[obj_m_win] ;указатель на окно + cmp eax,0 + je @f + test_bool_prop eax,BIT_MOD_WI_CORD_OTN_CL_OBL + ;bt dword[[obj_m_win]+u_object.modif-u_object],n_prop + jnc @f + add coord_x,SKIN_W1 + add coord_y,SKIN_H + @@: + pop eax } ;перерисовка окна конструктора diff --git a/programs/develop/kol_f_edit/kol_f_edit.asm b/programs/develop/kol_f_edit/kol_f_edit.asm index fe9e682a09..84e08f46e6 100644 --- a/programs/develop/kol_f_edit/kol_f_edit.asm +++ b/programs/develop/kol_f_edit/kol_f_edit.asm @@ -20,7 +20,7 @@ include 'obj_codes.inc' @use_library_mem mem.Alloc,mem.Free,mem.ReAlloc, dll.Load -hed db 'kol_f_edit 31.12.10',0 +hed db 'kol_f_edit 10.03.11',0 sizeof.TreeList equ 20 ;need for element 'tree_list' @@ -47,10 +47,10 @@ BIT_MOD_ACI equ 0 ; BIT_MOD_ACM equ 1 ;события от мыши BIT_MOD_ACD equ 2 ;данные объектов BIT_MOD_ABU equ 3 ;связывание кнопок -;CPP_MOD_WI_CA equ 16 ;стиль окна подпись -;CPP_MOD_WI_AO equ 32 ;стиль окна координаты относительно клиентской области -;CPP_MOD_WI_RD equ 64 ;стиль окна перерисовка окна -;CPP_MOD_WI_GR equ 128 ;стиль окна градиент +BIT_MOD_WI_CAPT equ 0 ;стиль окна подпись +BIT_MOD_WI_CORD_OTN_CL_OBL equ 1 ;стиль окна координаты относительно клиентской области +BIT_MOD_WI_REDR equ 2 ;стиль окна перерисовка окна +BIT_MOD_WI_GRAD equ 3 ;стиль окна градиент BIT_MOD_CHE equ 0 ; ch_flag_en - выбран CheckBox BIT_MOD_CHE_T equ 1 ;сверху BIT_MOD_CHE_M equ 2 ;по центру diff --git a/programs/develop/kol_f_edit/min_prog.ced b/programs/develop/kol_f_edit/min_prog.ced index d6ba7d0d9d..389500e098 100644 Binary files a/programs/develop/kol_f_edit/min_prog.ced and b/programs/develop/kol_f_edit/min_prog.ced differ diff --git a/programs/develop/kol_f_edit/ob_o.asm b/programs/develop/kol_f_edit/ob_o.asm index 1d1f145fca..a1706e295d 100644 --- a/programs/develop/kol_f_edit/ob_o.asm +++ b/programs/develop/kol_f_edit/ob_o.asm @@ -52,7 +52,7 @@ ObjOpt C_TXT, 1,0,'asm ObjOpt C_WND, 1,1,'Окно','заголовок окна*стиль окна*отступ слева*отступ сверху*ширина*высота*цвет клиентской области*цвет заголовка (если есть)',\ <98,100,110,120,130,150,170, 0, 0, 0, 0>,\ <12, -1, 15, 16, 26, 27, 25, 25, -1, -1, -1>,\ - txt_bit_wnd + txt_bit_wnd,txt_bit_wnd.v ObjOpt C_INC, 1,0,'Включение файла','имя файла*комментарий',\ <100, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0>,\ < 6, 5, -1, -1, -1, -1, -1, -1, -1, -1, -1> @@ -86,10 +86,16 @@ txt_bit_auto db ' db 'нажатия на кнопки',0 db 0 txt_bit_wnd db 'подпись окна',0 - db 'окно не закрашивает клиентскую обл.',0 db 'коорд. относительно клиентской обл.',0 + db 'окно не закрашивает клиентскую обл.',0 db 'градиентная заливка раб. обл.',0 db 0 +.v: + db '0x10000000',0 + db '0x20000000',0 + db '0x40000000',0 + db '0x80000000',0 + db 0 txt_bit_edit db 'в фокусе',0 db 'цифры от 0-9',0 db 0