Subversion Repositories Kolibri OS

Rev

Rev 1636 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  1. ;---------------------------------------------------------------------
  2. system_dir_ProcLib      db '/sys/lib/proc_lib.obj',0
  3. ;---------------------------------------------------------------------
  4. head_f_i:
  5. head_f_l        db 'System error',0
  6.  
  7. err_message_found_lib2  db 'proc_lib.obj - Not found!',0
  8.  
  9. err_message_import2     db 'proc_lib.obj - Wrong import!',0
  10. ;---------------------------------------------------------------------
  11. align 4
  12. l_libs_start:
  13.  
  14. library02  l_libs system_dir_ProcLib+9, cur_dir_path, library_path, system_dir_ProcLib, \
  15. err_message_found_lib2, head_f_l, ProcLib_import, err_message_import2, head_f_i
  16.  
  17. end_l_libs:
  18. ;---------------------------------------------------------------------
  19. align 4
  20. OpenDialog_data:
  21. .type                   dd 1    ; Save
  22. .procinfo               dd procinfo     ;+4
  23. .com_area_name          dd communication_area_name      ;+8
  24. .com_area               dd 0    ;+12
  25. .opendir_pach           dd temp_dir_pach        ;+16
  26. .dir_default_pach       dd communication_area_default_pach      ;+20
  27. .start_path             dd open_dialog_path     ;+24
  28. .draw_window            dd drawwin      ;+28
  29. .status                 dd 0    ;+32
  30. .openfile_pach          dd file_path    ;+36
  31. .filename_area          dd filename_area        ;+40
  32. .filter_area            dd Filter
  33. .x:
  34. .x_size                 dw 420 ;+48 ; Window X size
  35. .x_start                dw 10 ;+50 ; Window X position
  36. .y:
  37. .y_size                 dw 320 ;+52 ; Window y size
  38. .y_start                dw 10 ;+54 ; Window Y position
  39.  
  40. communication_area_name:
  41.         db 'FFFFFFFF_open_dialog',0
  42. open_dialog_path:
  43.         db '/sys/File Managers/opendial',0
  44. communication_area_default_pach:
  45.         db '/rd0/1/',0
  46.  
  47. Filter:
  48. dd      Filter.end - Filter
  49. .1:
  50. db      'MGB',0
  51. .end:
  52. db      0
  53.  
  54. ;start_temp_file_name:  db 'pattern.mgb',0
  55.  
  56. path4   db '/sys/noname.bmp',0
  57. ;---------------------------------------------------------------------
  58. align 4
  59. ProcLib_import:
  60. OpenDialog_Init         dd aOpenDialog_Init
  61. OpenDialog_Start        dd aOpenDialog_Start
  62. ;OpenDialog__Version    dd aOpenDialog_Version
  63.         dd      0
  64.         dd      0
  65. aOpenDialog_Init        db 'OpenDialog_init',0
  66. aOpenDialog_Start       db 'OpenDialog_start',0
  67. ;aOpenDialog_Version    db 'Version_OpenDialog',0
  68. ;---------------------------------------------------------------------