Subversion Repositories Kolibri OS

Rev

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

Rev 1489 Rev 1592
Line 23... Line 23...
23 
include '../../macros.inc'
 23 
include '../../macros.inc'
24 
include 'mem.inc'
 24 
include 'mem.inc'
25 
include '../../develop/libraries/box_lib/load_lib.mac'
 25 
include '../../develop/libraries/box_lib/load_lib.mac'
26 
include '../../develop/libraries/box_lib/trunk/box_lib.mac'
 26 
include '../../develop/libraries/box_lib/trunk/box_lib.mac'
27 
include 'lang.inc'
 27 
include 'lang.inc'
28 
include '../../develop/libraries/box_lib/asm/trunk/opendial.mac'
 - 
 
29 
use_OpenDialog
 - 
 
Line 30... Line 28...
30 
 
 28 
 
31 
include 't_data.inc'
 29 
include 't_data.inc'
32 
include 'strlen.inc'
 30 
include 'strlen.inc'
33 
include 't_draw.inc' ;draw main window functions
 31 
include 't_draw.inc' ;draw main window functions
Line 70... Line 68...
70 
;---------------------------------------------------------------------
 68 
;---------------------------------------------------------------------
71 
  stdcall [ted_init], tedit0
 69 
	stdcall [ted_init], tedit0
72 
  stdcall dword[tl_data_init], tree1
 70 
	stdcall dword[tl_data_init], tree1
Line 73... Line 71...
73 
 
 71 
 
74 
; OpenDialog initialisation
 72 
; OpenDialog initialisation
Line 75... Line 73...
75 
init_OpenDialog OpenDialog_data
 73 
	stdcall [OpenDialog_Init],OpenDialog_data
76 
 
 74 
 
77 
; init bmp file
 75 
; init bmp file
78 
  mov ecx,1200*18
 76 
  mov ecx,1200*18
Line 509... Line 507...
509 
edit2 edit_box TED_PANEL_WIDTH-1, 0, 20, 0xffffff, 0xff80, 0xff0000, 0xff, 0x4080, 300, buf_find, mouse_dd, 0
 507 
edit2 edit_box TED_PANEL_WIDTH-1, 0, 20, 0xffffff, 0xff80, 0xff0000, 0xff, 0x4080, 300, buf_find, mouse_dd, 0
Line 510... Line 508...
510 
 
 508 
 
Line 511... Line 509...
511 
buf_find db 302 dup(0)
 509 
buf_find db 302 dup(0)
512 
 
 - 
 
513 
if lang eq ru
 510 
 
514 
  err_message_found_lib0 db 'ˆ§¢¨­¨â¥ ­¥ 㤠«®áì ­ ©â¨ ¡¨¡«¨®â¥ªã box_lib.obj',0
 511 
if lang eq ru
- 
 
 512 
  head_f_i0:
515 
  head_f_i0:
 513 
  head_f_l0  db '‘¨á⥬­ ï ®è¨¡ª ',0
516 
  head_f_l0  db '‘¨á⥬­ ï ®è¨¡ª ',0
 514 
  err_message_found_lib0 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'box_lib.obj',39,0
517 
  err_message_import0 db 'Žè¨¡ª  ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ box_lib.obj',0
 515 
  err_message_import0 db 'Žè¨¡ª  ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'box_lib.obj',39,0
- 
 
 516 
  err_message_found_lib1 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'msgbox.obj',39,0
- 
 
 517 
  err_message_import1 db 'Žè¨¡ª  ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'msgbox.obj',39,0
518 
  err_message_found_lib1 db 'ˆ§¢¨­¨â¥ ­¥ 㤠«®áì ­ ©â¨ ¡¨¡«¨®â¥ªã msgbox.obj',0
 518 
  err_message_found_lib2 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  ',39,'proc_lib.obj',39,0
519 
  err_message_import1 db 'Žè¨¡ª  ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ msgbox.obj',0
 - 
 
520 
else
 519 
  err_message_import2 db 'Žè¨¡ª  ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'proc_lib.obj',39,0
521 
  err_message_found_lib0 db 'Sorry I cannot found library box_lib.obj',0
 520 
else
- 
 
 521 
  head_f_i0:
522 
  head_f_i0:
 522 
  head_f_l0  db 'System error',0
523 
  head_f_l0  db 'System error',0
 523 
  err_message_found_lib0 db 'Sorry I cannot found library ',39,'box_lib.obj',39,0
524 
  err_message_import0 db 'Error on load import library box_lib.obj',0
 524 
  err_message_import0 db 'Error on load import library ',39,'box_lib.obj',39,0
525 
  err_message_found_lib1 db 'Sorry I cannot found library msgbox.obj',0
 525 
  err_message_found_lib1 db 'Sorry I cannot found library ',39,'msgbox.obj',39,0
526 
  ;head_f_i1:
 526 
  err_message_import1 db 'Error on load import library ',39,'msgbox.obj',39,0
527 
  ;head_f_l1 db 'System error',0
 527 
  err_message_found_lib2 db 'Sorry I cannot found library ',39,'proc_lib.obj',39,0
Line 528... Line 528...
528 
  err_message_import1 db 'Error on load import library msgbox.obj',0
 528 
  err_message_import2 db 'Error on load import library ',39,'proc_lib.obj',39,0
529 
end if
 529 
end if
530 
 
 530 
 
531 
;library structures
 531 
;library structures
- 
 
 532 
l_libs_start:
532 
l_libs_start:
 533 
  lib0 l_libs lib0_name, sys_path, file_name, system_dir0, err_message_found_lib0, head_f_l0, boxlib_import,err_message_import0, head_f_i0
Line 533... Line 534...
533 
  lib0 l_libs boxlib_name, sys_path, file_name, system_dir0, err_message_found_lib0, head_f_l0, boxlib_import,err_message_import0, head_f_i0
 534 
  lib1 l_libs lib1_name, sys_path, file_name, system_dir1, err_message_found_lib1, head_f_l0, msgbox_lib_import, err_message_import1, head_f_i0
534 
  lib1 l_libs msgbox_name, sys_path, file_name, system_dir1, err_message_found_lib1, head_f_l0, msgbox_lib_import, err_message_import1, head_f_i0
 535 
  lib2 l_libs lib2_name, sys_path, file_name, system_dir2, err_message_found_lib2, head_f_l0, proclib_import, err_message_import2, head_f_i0