Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 7726 → Rev 7660

/programs/media/kiv/trunk/kiv.asm
154,6 → 154,7
mouse:
mov [pict_moved], 0
 
invoke scrollbar_vert_mouse, scroll_bar_data_vertical
invoke scrollbar_hort_mouse, scroll_bar_data_horizontal
xor ecx, ecx
326,18 → 327,16
call slide_show
jmp keyloop
.set_scale_none:
mov eax, LIBIMG_SCALE_NONE
call set_scale_mode
jz @f
stdcall set_scale_mode, LIBIMG_SCALE_NONE
mov eax, [scale_mode]
call recalc_canvas
@@:
; call draw_view
jmp keyloop
.set_scale_fit_min:
mov eax, LIBIMG_SCALE_FIT_MIN
call set_scale_mode
jz @f
stdcall set_scale_mode, LIBIMG_SCALE_FIT_MIN
mov eax, [scale_mode]
call recalc_work
@@:
; call draw_view
jmp keyloop
.move_pictport_left:
stdcall move_pictport, -KEY_MOVE_PIXELS, 0
670,6 → 669,14
mov [bShowToolbarSave], al
mov [bShowToolbar], 0
mov [canvas_padding], 0
; mov eax, [procinfo.box.width]
; mov [window.width], eax
; mov eax, [procinfo.box.height]
; mov [window.height], eax
; mov eax, [procinfo.box.left]
; mov [window.left], eax
; mov eax, [procinfo.box.top]
; mov [window.top], eax
mov [bg_color], 0x00000000
mcall SF_GET_SCREEN_SIZE
mov edx, eax
677,8 → 684,7
movzx eax, ax
mov esi, eax
mcall SF_CHANGE_WINDOW, 0, 0, ,
mov eax, LIBIMG_SCALE_FIT_MIN
call set_scale_mode
stdcall set_scale_mode, LIBIMG_SCALE_FIT_MIN
 
.done:
pop edi esi ebx
1771,12 → 1777,17
endp
 
 
; eax: new scaling mode
; z/Z - not/changed
proc set_scale_mode
cmp eax, [scale_mode]
proc set_scale_mode _mode
push eax ecx
xor ecx, ecx
mov eax, [_mode]
 
cmp [scale_mode], eax
jz @f
mov [bScaleModeChanged], 1
mov [scale_mode], eax
setnz [bScaleModeChanged]
@@:
pop ecx eax
ret
endp