Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 1653 → Rev 1654

/programs/develop/libraries/box_lib/asm/trunk/OpenDial.asm
54,10 → 54,10
mcall 68,11
mcall 66,1,1
mcall 40,0x27
call get_communication_area
call get_active_pocess
 
call get_communication_area
 
load_libraries l_libs_start,end_l_libs
test eax,eax
jnz button.exit
374,7 → 374,7
call draw_window
ret
@@:
add eax,12
add eax,16 ;12
;copy_path user_selected_name,dir_pach,eax,0
mov esi,dir_pach
mov edi,eax
967,7 → 967,7
movzx ebx,word [eax]
test eax,eax
jz .1
add eax,12 ;4
add eax,16 ;12 ;4
mov esi,eax
push esi
mov esi,[communication_area]
1123,7 → 1123,7
ret
@@:
mov edi,eax
add edi,12
add edi,16 ;12
mov esi,file_name
call copy_dir_name
1622,17 → 1622,27
ret
;---------------------------------------------------------------------
get_active_pocess:
; mcall 9,procinfo,-1
; mov eax,[ebx+30]
; mov [PID],eax
; xor ecx,ecx
;@@:
; inc ecx
; mcall 9,procinfo
; mov eax,[PID]
; cmp eax,[ebx+30]
; jne @r
; mov [active_process],ecx
 
mcall 9,procinfo,-1
mov eax,[ebx+30]
mov [PID],eax
xor ecx,ecx
@@:
inc ecx
mcall 9,procinfo
mov eax,[PID]
cmp eax,[ebx+30]
jne @r
mov [active_process],ecx
mov ecx,[ebx+30] ; PID
mcall 18,21
mov [active_process],eax ; WINDOW SLOT
mov ebx,[communication_area]
test ebx,ebx
jz .1
mov [ebx+12],eax ; WINDOW SLOT to com. area
.1:
ret
;---------------------------------------------------------------------
get_window_param:
/programs/develop/libraries/proc_lib/trunk/opendial.mac
89,6 → 89,10
.start:
pusha
mov ebp,dword [esp+36]
mcall 40,1b
push eax ; save events mask
mov eax,od_com_area
test eax,eax
jz .1
132,7 → 136,7
mov [eax+8],ebx
 
mov edi,eax
add edi,12
add edi,16 ;12
 
mov esi,od_opendir_pach
xor eax,eax
177,11 → 181,31
.still:
mcall 23,50
cmp eax,1
jne @f
jne .no_draw
 
pusha
call od_draw_window
popa
 
pusha
mcall 9,od_procinfo,-1
mov ecx,[ebx+30] ; PID
mcall 18,21
mov ecx,eax ; WINDOW SLOT
mcall 18,7
cmp eax,ecx ; compare ACTIVE and WINDOW SLOT
jne @f
mov eax,od_com_area
; xor ecx,ecx
mov ecx,[eax+12]
test ecx,ecx
jz @f
mcall 18,3
@@:
popa
 
.no_draw:
mov eax,od_com_area
movzx ebx,word [eax]
test ebx,ebx
192,7 → 216,7
jne .still
 
mov esi,od_com_area
add esi,12
add esi,16 ;12
mov edi,od_openfile_pach
call .copy
mov od_status,1
224,6 → 248,9
mov od_x_size,ebx
mov ebx,[eax+8]
mov od_y_size, ebx
pop ebx ; restore events mask
mcall 40
OpenDialog_exit
;----------------------------------------------
.get_filter_data: