Subversion Repositories Kolibri OS

Rev

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

Rev 9035 Rev 9531
Line 6... Line 6...
6 
;        11.05.2009 - ¤«ï à ¡®âë ­ã¦­  á¨á⥬­ ï ¡¨¡«¨®â¥ª  box_lib.obj
 6 
;        11.05.2009 - ¤«ï à ¡®âë ­ã¦­  á¨á⥬­ ï ¡¨¡«¨®â¥ª  box_lib.obj
7 
;   Mario79   08.09.2010 - select path with OpenDialog,keys 1,2,3,4 for select options
 7 
;   Mario79   08.09.2010 - select path with OpenDialog,keys 1,2,3,4 for select options
8 
;   Heavyiron 01.12.2013 - new logic
 8 
;   Heavyiron 01.12.2013 - new logic
9 
;---------------------------------------------------------------------
 9 
;---------------------------------------------------------------------
10 
appname equ 'RDsave '
 10 
appname equ 'RDsave '
11 
version equ '1.43'
 11 
version equ '1.44'
12 
debug	equ no
 12 
debug	equ no
Line 13... Line 13...
13 
 
 13 
 
14 
use32	     ; ¢ª«îç¨âì 32-¡¨â­ë© ०¨¬  áᥬ¡«¥à 
 14 
use32	     ; ¢ª«îç¨âì 32-¡¨â­ë© ०¨¬  áᥬ¡«¥à 
Line 49... Line 49...
49 
	test	eax,eax
 49 
	test	eax,eax
50 
	jz	close
 50 
	jz	close
Line 51... Line 51...
51 
 
 51 
 
Line 52... Line 52...
52 
	stdcall dll.Init,[init_lib]
 52 
	stdcall dll.Init,[init_lib]
53 
 
 53 
 
54 
	invoke	ini_get_int,ini_file,asettings,aautoclose,0
 54 
	invoke	ini_get_int,ini_file,ini_section,aautoclose,0
55 
	mov	[autoclose],eax
 55 
	mov	[autoclose],eax
56 
	invoke	ini_get_str,ini_file,apath,apath,fname_buf,4096,path
 56 
	invoke	ini_get_str,ini_file,ini_section,apath,fname_buf,4096,path
Line 57... Line 57...
57 
	stdcall _lstrcpy,ini_path,fname_buf
 57 
	stdcall _lstrcpy,ini_path,fname_buf
58 
	stdcall _lstrcpy,filename_area,start_temp_file_name
 58 
	stdcall _lstrcpy,filename_area,start_temp_file_name
Line 241... Line 241...
241 
	mov	edx, aUnknownError
 241 
	mov	edx, aUnknownError
Line 242... Line 242...
242 
 
 242 
 
243 
print_err:
 243 
print_err:
244 
	stdcall _lstrlen,ini_path
 244 
	stdcall _lstrlen,ini_path
245 
	pusha
 245 
	pusha
246 
	invoke	ini_set_str,ini_file,apath,apath,ini_path,eax
 246 
	invoke	ini_set_str,ini_file,ini_section,apath,ini_path,eax
247 
	popa
 247 
	popa
248 
	stdcall _lstrcpy,msg,edx
 248 
	stdcall _lstrcpy,msg,edx
249 
	cmp	[hidden],1
 249 
	cmp	[hidden],1
250 
	je	@f
 250 
	je	@f
Line 313... Line 313...
313 
	ret
 313 
	ret
314 
;---------------------------------------------------------------------
 314 
;---------------------------------------------------------------------
315 
save_ini:
 315 
save_ini:
316 
	pusha
 316 
	pusha
317 
	stdcall _lstrlen,fname_buf
 317 
	stdcall _lstrlen,fname_buf
318 
	invoke	ini_set_str,ini_file,apath,apath,fname_buf,eax
 318 
	invoke	ini_set_str,ini_file,ini_section,apath,fname_buf,eax
319 
	invoke	ini_set_int,ini_file,asettings,aautoclose,[autoclose]
 319 
	invoke	ini_set_int,ini_file,ini_section,aautoclose,[autoclose]
320 
	popa
 320 
	popa
321 
	ret
 321 
	ret
322 
;---------------------------------------------------------------------
 322 
;---------------------------------------------------------------------
323 
check_path:
 323 
check_path:
324 
stdcall _lstrlen,check_dir
 324 
stdcall _lstrlen,check_dir
Line 638... Line 638...
638 
aini_get_int db 'ini_get_int',0
 638 
aini_get_int db 'ini_get_int',0
639 
aini_set_str db 'ini_set_str',0
 639 
aini_set_str db 'ini_set_str',0
640 
aini_set_int db 'ini_set_int',0
 640 
aini_set_int db 'ini_set_int',0
641 
;---------------------------------------------------------------------
 641 
;---------------------------------------------------------------------
Line -... Line 642...
- 
 
 642 
 
- 
 
 643 
ini_file db  '/sys/settings/app.ini',0
642 
 
 644 
ini_section db 'RDSave',0
643 
apath db 'path',0
 - 
 
644 
asettings db 'settings',0
 645 
apath db 'path',0
645 
aautoclose db 'autoclose',0
 646 
aautoclose db 'autoclose',0
646 
path	db '/hd2/1/kolibri.img',0
 - 
 
647 
ini_file db  '/sys/settings/rdsave.ini',0
 - 
 
648 
;ini_file db  '/sys/rdsave.ini',0
 647 
path	db '/hd2/1/kolibri.img',0
649 
;---------------------------------------------------------------------
 648 
;---------------------------------------------------------------------
650 
is_notify:
 649 
is_notify:
651 
    dd	  7, 0, ok, 0, 0
 650 
    dd	  7, 0, ok, 0, 0
Line 652... Line 651...
652 
    db	  "/rd/1/@notify", 0
 651 
    db	  "/sys/@notify", 0
653 
 
 652 
 
654 
read_folder:
 653 
read_folder:
655 
.subfunction	dd 1
 654 
.subfunction	dd 1