Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 1467 → Rev 1468

/programs/other/planet_v/planet_v.asm
848,7 → 848,7
align 4
fun_opn_dlg: ;äã­ªæ¨ï ¤«ï ¢ë§®¢  OpenFile ¤¨ «®£ 
pushad
copy_path open_dialog_name,sys_path,file_name,0
copy_path open_dialog_name,communication_area_default_path,file_name,0
mov [OpenDialog_data.type],2
mov dword[plugin_path],0 ;çâ®-¡ë ¯à¨ ®âªàë⨨ ¤¨ «®£®¢®£® ®ª­  ¯ãâì ¢á¥£¤  ¡à «áï ¨§ OpenDialog_data.dir_default_path
start_OpenDialog OpenDialog_data
969,7 → 969,7
open_dialog_name:
db 'opendial',0
communication_area_default_path:
db '/rd/1',0
db '/rd/1/File managers/',0
 
Filter:
dd Filter.end - Filter.1
/programs/other/t_edit/t_button.inc
136,11 → 136,19
jmp .ret_f
@@:
 
copy_path open_dialog_name,sys_path,file_name,0
copy_path open_dialog_name,communication_area_default_path,file_name,0
mov [OpenDialog_data.type],0
start_OpenDialog OpenDialog_data
cmp [OpenDialog_data.status],2
jne @f
stdcall mem_spac, msgbox_9.fdp,100
mov esi,file_name
call strlen
cmp eax,100
jle .no_crop
mov eax,100
.no_crop:
stdcall mem_copy, esi,msgbox_9.fdp,eax
stdcall [mb_create],msgbox_9,thread ;message: error run 'open file dialog'
jmp .ret_f
@@:
155,6 → 163,30
popad
ret
 
align 4
proc mem_copy, source:dword, destination:dword, len:dword
push ecx esi edi
cld
mov esi, dword[source]
mov edi, dword[destination]
mov ecx, dword[len]
rep movsb
pop edi esi ecx
ret
endp
 
align 4
proc mem_spac, mem:dword, len:dword
push eax ecx edi
cld
mov al,' '
mov edi, dword[mem]
mov ecx, dword[len]
repne stosb
pop edi ecx eax
ret
endp
 
;input:
; eax = ª®¤ ®è¨¡ª¨
; ebx = ª®««¨ç¥á⢮ ¯à®ç¨â ­­ëå ¡ ©â
/programs/other/t_edit/t_data.inc
335,7 → 335,7
open_dialog_name:
db 'opendial',0
communication_area_default_path:
db '/rd/1',0
db '/rd/1/File managers/',0
 
Filter:
dd Filter.end - Filter.1
542,7 → 542,10
msgbox_9:
db 3,0
db '‚­¨¬ ­¨¥',0
db '¥ ®âªàë«áï ',39,'¤¨ «®£ ®âªàëâ¨ï ä ©« .',39,0
db '¥ ®âªàë«áï ',39,'¤¨ «®£ ®âªàëâ¨ï ä ©« ',39,'.',13
.fdp:
rb 100
db 0
db '‡ ªàëâì',0
db 0
 
647,7 → 650,10
msgbox_9:
db 3,0
db 'Warning',0
db 'Error run ',39,'open file dialog',39,0
db 'Error run ',39,'open file dialog',39,'.',13
.fdp:
rb 100
db 0
db 'Close',0
db 0